From c184136f8a5ca4e5996af50c16266d18791e1550 Mon Sep 17 00:00:00 2001 From: Danielle McLean Date: Sat, 14 Oct 2017 15:04:01 +1100 Subject: [PATCH] Remove unnecessary templates for Handler.Entries - this allows it not to use TH at all :) --- src/Handler/Entries.hs | 5 ++--- templates/entries.hamlet | 1 - templates/entry.hamlet | 1 - 3 files changed, 2 insertions(+), 5 deletions(-) delete mode 100644 templates/entries.hamlet delete mode 100644 templates/entry.hamlet diff --git a/src/Handler/Entries.hs b/src/Handler/Entries.hs index dadea37..f552667 100644 --- a/src/Handler/Entries.hs +++ b/src/Handler/Entries.hs @@ -1,6 +1,5 @@ {-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-} -{-# LANGUAGE TemplateHaskell #-} module Handler.Entries where import Import @@ -22,7 +21,7 @@ getEntriesR kind = do defaultLayout $ do setTitle . toHtml . K.pluralise $ kind atomLink (FeedKindR kind) $ T.concat [K.pluralise kind, " ~ ", title] - $(widgetFile "entries") + hFeed entries getEntryR :: a -> EntryId -> Handler Html getEntryR _ = renderEntry <=< getCached @@ -38,4 +37,4 @@ renderEntry entry = do redirectWith movedPermanently301 correctRoute defaultLayout $ do setTitle . toHtml . entryTitle . entityVal $ entry - $(widgetFile "entry") + hEntry entry diff --git a/templates/entries.hamlet b/templates/entries.hamlet deleted file mode 100644 index da892e3..0000000 --- a/templates/entries.hamlet +++ /dev/null @@ -1 +0,0 @@ -^{hFeed entries} diff --git a/templates/entry.hamlet b/templates/entry.hamlet deleted file mode 100644 index 0907ce8..0000000 --- a/templates/entry.hamlet +++ /dev/null @@ -1 +0,0 @@ -^{hEntry entry}