From e13c1f2af988aca231301df3f093b130a87731c5 Mon Sep 17 00:00:00 2001 From: Sergei Trofimovich Date: Fri, 29 Apr 2016 09:38:55 +0100 Subject: src/Hakyll/Web/Paginate.hs: Fix build failure MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit The code tried to generate Show instance for a function. I don't know where it used to come from but it's not there anymore. Build fails as: [48 of 49] Compiling Hakyll.Web.Paginate ( src/Hakyll/Web/Paginate.hs, dist/build/Hakyll/Web/Paginate.o ) src/Hakyll/Web/Paginate.hs:40:17: No instance for (Show (PageNumber -> Identifier)) (maybe you haven't applied enough arguments to a function?) arising from the second field of ‘Paginate’ (type ‘PageNumber -> Identifier’) Possible fix: use a standalone 'deriving instance' declaration, so you can specify the instance context yourself When deriving the instance for (Show Paginate) Change drops Show instance as it's not very useful. Signed-off-by: Sergei Trofimovich --- src/Hakyll/Web/Paginate.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Hakyll/Web/Paginate.hs b/src/Hakyll/Web/Paginate.hs index 65b4525..32e5631 100644 --- a/src/Hakyll/Web/Paginate.hs +++ b/src/Hakyll/Web/Paginate.hs @@ -37,7 +37,7 @@ data Paginate = Paginate { paginateMap :: M.Map PageNumber [Identifier] , paginateMakeId :: PageNumber -> Identifier , paginateDependency :: Dependency - } deriving (Show) + } -------------------------------------------------------------------------------- -- cgit v1.2.3