From e41fd61bdeac8779fa24050cc0d44714f7c90f1d Mon Sep 17 00:00:00 2001 From: jao Date: Sat, 29 Apr 2017 02:09:24 +0200 Subject: hlint configuration --- src/Plugins/Date.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'src/Plugins/Date.hs') diff --git a/src/Plugins/Date.hs b/src/Plugins/Date.hs index cd688e6..b2d32da 100644 --- a/src/Plugins/Date.hs +++ b/src/Plugins/Date.hs @@ -24,7 +24,6 @@ import Plugins #if ! MIN_VERSION_time(1,5,0) import System.Locale #endif -import Control.Monad (liftM) import Data.Time data Date = Date String String Int @@ -36,4 +35,4 @@ instance Exec Date where rate (Date _ _ r) = r date :: String -> IO String -date format = liftM (formatTime defaultTimeLocale format) getZonedTime +date format = fmap (formatTime defaultTimeLocale format) getZonedTime -- cgit v1.2.3