hlint
This commit is contained in:
parent
e7aaa55c53
commit
a1e52f0ce5
18 changed files with 36 additions and 37 deletions
|
@ -36,7 +36,7 @@ seek :: [CommandSeek]
|
|||
seek = [withField formatOption formatconverter $ \f ->
|
||||
withFilesInGit $ whenAnnexed $ start f]
|
||||
where
|
||||
formatconverter = return . maybe Nothing (Just . Utility.Format.gen)
|
||||
formatconverter = return . fmap Utility.Format.gen
|
||||
|
||||
start :: Maybe Utility.Format.Format -> FilePath -> (Key, Backend) -> CommandStart
|
||||
start format file (key, _) = do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue