From e78475737636a5d1e0d0a36b475c300cc7bb56cc Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 15 Jul 2011 03:12:05 -0400 Subject: hlint tweaks Did all sources except Remotes/* and Command/* --- Backend/WORM.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Backend/WORM.hs') diff --git a/Backend/WORM.hs b/Backend/WORM.hs index 036d0564c..831c9e8ce 100644 --- a/Backend/WORM.hs +++ b/Backend/WORM.hs @@ -35,7 +35,7 @@ backend = Types.Backend.Backend { keyValue :: FilePath -> Annex (Maybe Key) keyValue file = do stat <- liftIO $ getFileStatus file - return $ Just $ Key { + return $ Just Key { keyName = takeFileName file, keyBackendName = name backend, keySize = Just $ fromIntegral $ fileSize stat, -- cgit v1.2.3