aboutsummaryrefslogtreecommitdiff
path: root/Command/Untrust.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-01-26 16:20:28 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-01-26 16:20:28 -0400
commit7f6af79232eee685daf58e72737c5284f80cf482 (patch)
treee3ec0e7612845e056df355c6841ee9a58e603d52 /Command/Untrust.hs
parent7b2da21ab7bc51785203a69cc05ab811a8629ecb (diff)
trust setting improvements
Diffstat (limited to 'Command/Untrust.hs')
-rw-r--r--Command/Untrust.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Untrust.hs b/Command/Untrust.hs
index 9e884e812..69d0ab391 100644
--- a/Command/Untrust.hs
+++ b/Command/Untrust.hs
@@ -21,11 +21,11 @@ command = [Command "untrust" (paramRepeating paramRemote) seek
seek :: [CommandSeek]
seek = [withString start]
-{- Marks a remote as not trusted. -}
start :: CommandStartString
start name = do
- r <- Remotes.byName name
showStart "untrust" name
+ Remotes.readConfigs
+ r <- Remotes.byName name
return $ Just $ perform r
perform :: Git.Repo -> CommandPerform