From f0b6e0ee4970c2338159c376935d375f4aeda1dc Mon Sep 17 00:00:00 2001 From: John MacFarlane Date: Fri, 16 Mar 2018 12:11:51 -0700 Subject: Monoid/Semiground cleanup relying on custom Prelude. --- src/Text/Pandoc/Class.hs | 4 ---- 1 file changed, 4 deletions(-) (limited to 'src/Text/Pandoc/Class.hs') diff --git a/src/Text/Pandoc/Class.hs b/src/Text/Pandoc/Class.hs index f7544433c..40927252f 100644 --- a/src/Text/Pandoc/Class.hs +++ b/src/Text/Pandoc/Class.hs @@ -923,11 +923,7 @@ data FileInfo = FileInfo { infoFileMTime :: UTCTime } newtype FileTree = FileTree {unFileTree :: M.Map FilePath FileInfo} -#if MIN_VERSION_base(4,9,0) deriving (Semigroup, Monoid) -#else - deriving (Monoid) -#endif getFileInfo :: FilePath -> FileTree -> Maybe FileInfo getFileInfo fp tree = -- cgit v1.2.3