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}