diff options
| -rw-r--r-- | Git/HashObject.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/HashObject.hs b/Git/HashObject.hs index 97e1befe6..8cd35167d 100644 --- a/Git/HashObject.hs +++ b/Git/HashObject.hs @@ -32,7 +32,7 @@ hashObjectStop = CoProcess.stop hashFile :: HashObjectHandle -> FilePath -> IO Sha hashFile h file = CoProcess.query h send receive where - send to = hPutStrLn to file + send to = hPutStrLn to =<< absPath file receive from = getSha "hash-object" $ hGetLine from {- Injects a blob into git. Unfortunately, the current git-hash-object |