diff options
Diffstat (limited to 'Command/InAnnex.hs')
-rw-r--r-- | Command/InAnnex.hs | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Command/InAnnex.hs b/Command/InAnnex.hs index ac4af8d0b..cd4bff2c6 100644 --- a/Command/InAnnex.hs +++ b/Command/InAnnex.hs @@ -20,8 +20,8 @@ seek = [withKeys start] start :: Key -> CommandStart start key = inAnnexSafe key >>= dispatch - where - dispatch (Just True) = stop - dispatch (Just False) = exit 1 - dispatch Nothing = exit 100 - exit n = liftIO $ exitWith $ ExitFailure n + where + dispatch (Just True) = stop + dispatch (Just False) = exit 1 + dispatch Nothing = exit 100 + exit n = liftIO $ exitWith $ ExitFailure n |