mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

formatting

Browse source
This commit is contained in:
Joey Hess 2015-07-09 10:41:17 -04:00
parent d0cf4b2dd4
commit c1c64ec76c
4 changed files with 16 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

13
Command/Fsck.hs
View file

@ -60,24 +60,19 @@ optParser :: CmdParamsDesc -> Parser FsckOptions
optParser desc = FsckOptions
<$> cmdParams desc
<*> optional (strOption
( long "from"
<> short 'f'
<> metavar paramRemote
( long "from" <> short 'f' <> metavar paramRemote
<> help "check remote"
))
<*> switch
( long "incremental"
<> short 'S'
( long "incremental" <> short 'S'
<> help "start an incremental fsck"
)
<*> switch
( long "more"
<> short 'm'
( long "more" <> short 'm'
<> help "continue an incremental fsck"
)
<*> optional (option (str >>= parseDuration)
( long "incremental-schedule"
<> metavar paramTime
( long "incremental-schedule" <> metavar paramTime
<> help "schedule incremental fscking"
))
<*> parseKeyOptions False