lucid-colonnade 1.0 → 1.0.1
raw patch · 2 files changed
+9/−5 lines, 2 filesdep ~basedep ~text
Dependency ranges changed: base, text
Files
- lucid-colonnade.cabal +4/−4
- src/Lucid/Colonnade.hs +5/−1
lucid-colonnade.cabal view
@@ -1,5 +1,5 @@ name: lucid-colonnade-version: 1.0+version: 1.0.1 synopsis: Helper functions for using lucid with colonnade description: Lucid and colonnade homepage: https://github.com/andrewthad/colonnade#readme@@ -17,10 +17,10 @@ exposed-modules: Lucid.Colonnade build-depends:- base >= 4.7 && < 5- , colonnade >= 1.1 && < 1.3+ base >= 4.9 && < 5+ , colonnade >= 1.1.1 && < 1.3 , lucid >= 2.9 && < 3.0- , text >= 1.0 && < 1.3+ , text >= 1.2 && < 1.3 default-language: Haskell2010 source-repository head
src/Lucid/Colonnade.hs view
@@ -30,7 +30,8 @@ import Colonnade (Colonnade,Headed,Headless,Fascia,Cornice) import Data.Text (Text) import Control.Monad-import Data.Monoid+import Data.Semigroup+import Data.Monoid hiding ((<>)) import Data.Foldable import Data.String (IsString(..)) import Data.Maybe (listToMaybe)@@ -61,6 +62,9 @@ instance (d ~ ()) => IsString (Cell d) where fromString = stringCell++instance Semigroup d => Semigroup (Cell d) where+ Cell a1 c1 <> Cell a2 c2 = Cell (mappend a1 a2) (liftA2 (<>) c1 c2) instance Monoid d => Monoid (Cell d) where mempty = Cell mempty (return mempty)