diff options
author | Joey Hess <joey@kitenet.net> | 2010-11-06 17:07:11 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-11-06 17:07:11 -0400 |
commit | a3519c365feec45b5ab1236c7610863678b868a0 (patch) | |
tree | 5dcdee252d8301376c4bfaab127d0e2eba9eba19 /GitQueue.hs | |
parent | 016b6a59e7187ead0ed630699c85d0fec729a30d (diff) |
hlinted a few files
Diffstat (limited to 'GitQueue.hs')
-rw-r--r-- | GitQueue.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/GitQueue.hs b/GitQueue.hs index 632d1d391..2d44a8f10 100644 --- a/GitQueue.hs +++ b/GitQueue.hs @@ -16,7 +16,7 @@ import qualified Data.Map as M import System.IO import System.Cmd.Utils import Data.String.Utils -import Monad (unless) +import Control.Monad (unless) import qualified GitRepo as Git @@ -57,5 +57,5 @@ runAction repo action files = do where runxargs = pOpen WriteToPipe "xargs" ("-0":gitcmd) feedxargs gitcmd = ["git"] ++ Git.gitCommandLine repo - ((getSubcommand action):(getParams action)) + (getSubcommand action:getParams action) feedxargs h = hPutStr h $ join "\0" files |