rename some stuff and prepare to break out more into Command/*

1 files changed, 3 insertions, 3 deletions

diff --git a/Command/Untrust.hs b/Command/Untrust.hs
index 5ed8de245..6458040b3 100644
--- a/Command/Untrust.hs
+++ b/Command/Untrust.hs
@@ -17,17 +17,17 @@ import qualified Remotes
 import UUID
 import Messages
 
-seek :: [SubCmdSeek]
+seek :: [CommandSeek]
 seek = [withString start]
 
 {- Marks a remote as not trusted. -}
-start :: SubCmdStartString
+start :: CommandStartString
 start name = do
 	r <- Remotes.byName name
 	showStart "untrust" name
 	return $ Just $ perform r
 
-perform :: Git.Repo -> SubCmdPerform
+perform :: Git.Repo -> CommandPerform
 perform repo = do
 	uuid <- getUUID repo
 	trusted <- getTrusted