about summary refs log tree commit diff
path: root/services/tazblog/src/RSS.hs
diff options
context:
space:
mode:
authorVincent Ambo <tazjin@google.com>2019-08-25T22·06+0100
committerVincent Ambo <tazjin@google.com>2019-08-25T22·07+0100
commit1247848d76712bad1e47b2b67969db3456f04e75 (patch)
tree6f10329c2e2eec1ac4284dfec70676b1c5080031 /services/tazblog/src/RSS.hs
parent561ed1fbbb624ddc51f5a97f4a81354e458e64cd (diff)
refactor(tazblog): Implement HLint lints in all files r/64
Diffstat (limited to 'services/tazblog/src/RSS.hs')
-rw-r--r--services/tazblog/src/RSS.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/services/tazblog/src/RSS.hs b/services/tazblog/src/RSS.hs
index 112dcc34388a..913aa9a4081b 100644
--- a/services/tazblog/src/RSS.hs
+++ b/services/tazblog/src/RSS.hs
@@ -6,7 +6,6 @@ module RSS
 where
 
 import BlogStore
-import Control.Monad (liftM)
 import Data.Maybe (fromJust)
 import qualified Data.Text as T
 import Data.Time (UTCTime (..), getCurrentTime, secondsToDiffTime)
@@ -46,4 +45,4 @@ createFeed :: [Entry] -> IO RSS
 createFeed e = getCurrentTime >>= (\t -> return $ createRSS t $ createItems e)
 
 renderFeed :: [Entry] -> IO String
-renderFeed e = liftM (showXML . rssToXML) (createFeed e)
+renderFeed e = fmap (showXML . rssToXML) (createFeed e)