diff options
author | 2011-10-29 23:48:46 -0400 | |
---|---|---|
committer | 2011-10-30 00:28:22 -0400 | |
commit | 4e9be0d1f86893a469b33b763b55edfe75bdb3aa (patch) | |
tree | e721a64007bc52df419a720caf2907dcf62e54ef /Command/Fsck.hs | |
parent | ef5330120c0b522ff159a5b3caba7a926236947b (diff) |
refactoring and cleanup
No code changes.
Diffstat (limited to 'Command/Fsck.hs')
-rw-r--r-- | Command/Fsck.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs index 1f30d2eb6..073652d2c 100644 --- a/Command/Fsck.hs +++ b/Command/Fsck.hs @@ -49,7 +49,7 @@ withBarePresentKeys a params = isBareRepo >>= go go True = do unless (null params) $ do error "fsck should be run without parameters in a bare repository" - runActions a loggedKeys + prepStart a loggedKeys startBare :: Key -> CommandStart startBare key = case Backend.maybeLookupBackendName (Types.Key.keyBackendName key) of |