From 3b14082e5e729503aadf70bfe62660c33cc6d720 Mon Sep 17 00:00:00 2001 From: nek0 Date: Wed, 13 Aug 2014 18:17:44 +0200 Subject: [PATCH] a little cleanup --- Handler/Home.hs | 7 ------- Import.hs | 5 +++++ 2 files changed, 5 insertions(+), 7 deletions(-) diff --git a/Handler/Home.hs b/Handler/Home.hs index cfb15d8..a99d0b9 100644 --- a/Handler/Home.hs +++ b/Handler/Home.hs @@ -3,13 +3,6 @@ module Handler.Home where import Import --- This is a handler function for the GET request method on the HomeR --- resource pattern. All of your resource patterns are defined in --- config/routes --- --- The majority of the code you will write in Yesod lives in these handler --- functions. You can spread them across multiple files if you are so --- inclined, or create a single monolithic file. getHomeR :: Handler Html getHomeR = do recentMedia <- runDB $ selectList [] [Desc MediumTime] diff --git a/Import.hs b/Import.hs index e2fe88f..c29fb00 100644 --- a/Import.hs +++ b/Import.hs @@ -15,6 +15,11 @@ import Settings as Import import Settings.Development as Import import Settings.StaticFiles as Import +-- custom imports + + +-- end custom imports + #if __GLASGOW_HASKELL__ >= 704 import Data.Monoid as Import (Monoid (mappend, mempty, mconcat),