diff options
Diffstat (limited to 'Command/Proxy.hs')
-rw-r--r-- | Command/Proxy.hs | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/Command/Proxy.hs b/Command/Proxy.hs index 8c11bf770..3c487b9b5 100644 --- a/Command/Proxy.hs +++ b/Command/Proxy.hs @@ -17,12 +17,13 @@ import qualified Git.Sha import qualified Git.Ref import qualified Git.Branch -cmd :: [Command] -cmd = [notBareRepo $ - command "proxy" ("-- git command") seek - SectionPlumbing "safely bypass direct mode guard"] +cmd :: Command +cmd = notBareRepo $ + command "proxy" SectionPlumbing + "safely bypass direct mode guard" + ("-- git command") (withParams seek) -seek :: CommandSeek +seek :: CmdParams -> CommandSeek seek = withWords start start :: [String] -> CommandStart |