summaryrefslogtreecommitdiffstats
path: root/src/Zettel.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Zettel.hs')
-rw-r--r--src/Zettel.hs9
1 files changed, 5 insertions, 4 deletions
diff --git a/src/Zettel.hs b/src/Zettel.hs
index d754741..99c2dd3 100644
--- a/src/Zettel.hs
+++ b/src/Zettel.hs
@@ -1,6 +1,6 @@
-{-# Language GeneralizedNewtypeDeriving #-}
-{-# Language DerivingVia #-}
-{-# Language StandaloneDeriving #-}
+{-# LANGUAGE DerivingVia #-}
+{-# LANGUAGE GeneralizedNewtypeDeriving #-}
+{-# LANGUAGE StandaloneDeriving #-}
module Zettel where
@@ -12,11 +12,12 @@ class Combine a where
newtype UseCombine a = UC a
-instance Monoid a => Combine (UseCombine a) where
+instance (Monoid a) => Combine (UseCombine a) where
cappend (UC a) (UC b) = UC $ a <> b
cempty = UC mempty
deriving via (UseCombine Text) instance Combine Text
+
deriving via (UseCombine Pandoc) instance Combine Pandoc
newtype ZettelId = ZettelId