diff options
author | Joey Hess <joey@kitenet.net> | 2012-02-04 12:58:42 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-02-04 13:01:00 -0400 |
commit | 586be399523a9a0ae1ed39d34b84c2c78296b457 (patch) | |
tree | 8f9afc7816e52b0269aa3215c8f2e0bcddbba17a /Git | |
parent | f1c7dc12127fcbad411c28df57e9ce194bd66509 (diff) |
fix file encoding of HashObject
Diffstat (limited to 'Git')
-rw-r--r-- | Git/HashObject.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Git/HashObject.hs b/Git/HashObject.hs index f5e6d50cd..ae498278f 100644 --- a/Git/HashObject.hs +++ b/Git/HashObject.hs @@ -16,6 +16,7 @@ import Git.Command hashFiles :: [FilePath] -> Repo -> IO ([Sha], IO ()) hashFiles paths repo = do (pid, fromh, toh) <- hPipeBoth "git" $ toCommand $ git_hash_object repo + fileEncoding toh _ <- forkProcess (feeder toh) hClose toh shas <- map Ref . lines <$> hGetContentsStrict fromh |