summaryrefslogtreecommitdiff
path: root/Command/Add.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Add.hs')
-rw-r--r--Command/Add.hs8
1 files changed, 5 insertions, 3 deletions
diff --git a/Command/Add.hs b/Command/Add.hs
index 9410601b8..944525ea5 100644
--- a/Command/Add.hs
+++ b/Command/Add.hs
@@ -82,9 +82,11 @@ cleanup file key hascontent = do
-- touch the symlink to have the same mtime as the
-- file it points to
- liftIO $ do
- mtime <- modificationTime <$> getFileStatus file
- touch file (TimeSpec mtime) False
+ -- XXX Currently broken on non-utf8 locales when
+ -- dealing with utf-8 filenames.
+ --liftIO $ do
+ --mtime <- modificationTime <$> getFileStatus file
+ --touch file (TimeSpec mtime) False
force <- Annex.getState Annex.force
if force