From 35145202d2e463569989b710ab5b87f6d9a8fdc1 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 15 Sep 2011 16:50:49 -0400 Subject: remove command type definitions These were a mistake, they make the type signatures harder to read and less flexible. The CommandSeek, CommandStart, CommandPerform, and CommandCleanup types were a good idea, but composing them with the parameters expected is going too far. --- Command/Semitrust.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Command/Semitrust.hs') diff --git a/Command/Semitrust.hs b/Command/Semitrust.hs index b467861bf..3b12bb747 100644 --- a/Command/Semitrust.hs +++ b/Command/Semitrust.hs @@ -20,7 +20,7 @@ command = [repoCommand "semitrust" (paramRepeating paramRemote) seek seek :: [CommandSeek] seek = [withWords start] -start :: CommandStartWords +start :: [String] -> CommandStart start ws = do let name = unwords ws showStart "semitrust" name -- cgit v1.2.3