summaryrefslogtreecommitdiff
path: root/Command/Fsck.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Fsck.hs')
-rw-r--r--Command/Fsck.hs13
1 files changed, 4 insertions, 9 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs
index 885ce17dd..5350a63eb 100644
--- a/Command/Fsck.hs
+++ b/Command/Fsck.hs
@@ -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