summaryrefslogtreecommitdiff
path: root/git-repair.hs
diff options
context:
space:
mode:
authorJoey Hess <joey@kitenet.net>2013-11-21 02:00:43 -0400
committerJoey Hess <joey@kitenet.net>2013-11-21 02:00:43 -0400
commit897f030f68ff847c03494fbdd4104d1f8dfad9fe (patch)
tree1335c81fd5e9b2c4c92ca628e8401395467ca980 /git-repair.hs
parentf6687e4a7c7abaddab15f667051ce21dabe2427b (diff)
downloadgit-repair-897f030f68ff847c03494fbdd4104d1f8dfad9fe.tar.gz
simplify
Diffstat (limited to 'git-repair.hs')
-rw-r--r--git-repair.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/git-repair.hs b/git-repair.hs
index 5a092d3..ce1444f 100644
--- a/git-repair.hs
+++ b/git-repair.hs
@@ -18,10 +18,10 @@ data Settings = Settings
parseSettings :: Parser Settings
parseSettings = Settings
- <$> switch forceopt
- where
- forceopt = long "force"
+ <$> switch
+ ( long "force"
<> help "Force repair, even if data is lost"
+ )
main :: IO ()
main = execParser opts >>= repair