summaryrefslogtreecommitdiff
path: root/Command/FromKey.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/FromKey.hs')
-rw-r--r--Command/FromKey.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/Command/FromKey.hs b/Command/FromKey.hs
index d16eff846..717d528bc 100644
--- a/Command/FromKey.hs
+++ b/Command/FromKey.hs
@@ -27,9 +27,8 @@ command = [Command "fromkey" paramPath seek
seek :: [CommandSeek]
seek = [withFilesMissing start]
-{- Adds a file pointing at a manually-specified key -}
start :: CommandStartString
-start file = do
+start file = notBareRepo $ do
key <- cmdlineKey
inbackend <- Backend.hasKey key
unless inbackend $ error $