remove old comment
This commit is contained in:
parent
91fc975964
commit
90ab17e153
1 changed files with 0 additions and 2 deletions
|
@ -82,8 +82,6 @@ cleanup file key hascontent = do
|
||||||
|
|
||||||
-- touch the symlink to have the same mtime as the
|
-- touch the symlink to have the same mtime as the
|
||||||
-- file it points to
|
-- file it points to
|
||||||
-- XXX Currently broken on non-utf8 locales when
|
|
||||||
-- dealing with utf-8 filenames.
|
|
||||||
liftIO $ do
|
liftIO $ do
|
||||||
mtime <- modificationTime <$> getFileStatus file
|
mtime <- modificationTime <$> getFileStatus file
|
||||||
touch file (TimeSpec mtime) False
|
touch file (TimeSpec mtime) False
|
||||||
|
|
Loading…
Reference in a new issue