aboutsummaryrefslogtreecommitdiff
path: root/Command/PreCommit.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2011-03-12 15:30:17 -0400
committerGravatar Joey Hess <joey@kitenet.net>2011-03-12 15:30:17 -0400
commit72d268401604fbac93ca4701ab53d32880483686 (patch)
treea1ab880d30ece5ed1720d6db13ab5d9c5c1ca560 /Command/PreCommit.hs
parent9229d182d32570f6829ced655aa673ceddfe7693 (diff)
Rethink filename encoding handling for display. Since filename encoding may or may not match locale settings, any attempt to decode filenames will fail for some files. So instead, do all output in binary mode.0.23
Diffstat (limited to 'Command/PreCommit.hs')
-rw-r--r--Command/PreCommit.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/PreCommit.hs b/Command/PreCommit.hs
index d2f696434..6f9adb79a 100644
--- a/Command/PreCommit.hs
+++ b/Command/PreCommit.hs
@@ -34,7 +34,7 @@ perform pair@(file, _) = do
ok <- doCommand $ Command.Add.start pair
if ok
then return $ Just $ cleanup file
- else error $ "failed to add " ++ filePathToString file ++ "; canceling commit"
+ else error $ "failed to add " ++ file ++ "; canceling commit"
cleanup :: FilePath -> CommandCleanup
cleanup file = do