tweaks
This commit is contained in:
parent
16e7178f20
commit
abdacf58ed
8 changed files with 26 additions and 41 deletions
|
@ -52,7 +52,7 @@ withBarePresentKeys a params = isBareRepo >>= go
|
|||
go True = do
|
||||
unless (null params) $
|
||||
error "fsck should be run without parameters in a bare repository"
|
||||
prepStart a loggedKeys
|
||||
map a <$> loggedKeys
|
||||
|
||||
startBare :: Key -> CommandStart
|
||||
startBare key = case Backend.maybeLookupBackendName (Types.Key.keyBackendName key) of
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue