diff options
Diffstat (limited to 'Git/Queue.hs')
-rw-r--r-- | Git/Queue.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/Git/Queue.hs b/Git/Queue.hs index 63c3adee7..c71605ad5 100644 --- a/Git/Queue.hs +++ b/Git/Queue.hs @@ -18,7 +18,6 @@ import qualified Data.Map as M import System.IO import System.Cmd.Utils import Data.String.Utils -import Codec.Binary.UTF8.String import Utility.SafeCommand import Common @@ -91,4 +90,6 @@ runAction repo action files = where params = toCommand $ gitCommandLine (Param (getSubcommand action):getParams action) repo - feedxargs h = hPutStr h $ join "\0" $ map encodeString files + feedxargs h = do + fileEncoding h + hPutStr h $ join "\0" files |