summaryrefslogtreecommitdiff
path: root/Command/Trust.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Trust.hs')
-rw-r--r--Command/Trust.hs7
1 files changed, 4 insertions, 3 deletions
diff --git a/Command/Trust.hs b/Command/Trust.hs
index ef03828c2..d5444affe 100644
--- a/Command/Trust.hs
+++ b/Command/Trust.hs
@@ -18,10 +18,11 @@ command = [repoCommand "trust" (paramRepeating paramRemote) seek
"trust a repository"]
seek :: [CommandSeek]
-seek = [withString start]
+seek = [withWords start]
-start :: CommandStartString
-start name = notBareRepo $ do
+start :: CommandStartWords
+start ws = notBareRepo $ do
+ let name = unwords ws
showStart "trust" name
u <- Remote.nameToUUID name
next $ perform u