15 lines
340 B
Haskell
15 lines
340 B
Haskell
{-# LANGUAGE NoImplicitPrelude #-}
|
|
{-# LANGUAGE OverloadedStrings #-}
|
|
|
|
module Handler.Utils.Table where
|
|
-- General Utilities for Tables
|
|
|
|
-- import Import hiding ((<>))
|
|
import Data.Monoid ((<>))
|
|
|
|
import Text.Blaze as B
|
|
|
|
-- Table design
|
|
tableDefault :: Attribute
|
|
tableDefault = customAttribute "class" "table table-striped"
|