mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix error throwing

Browse source
This commit is contained in:
Joey Hess 2011-03-15 11:50:40 -04:00
parent 7b0c6177ff
commit 83a9bb624b
2 changed files with 8 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Command/Add.hs
View file

@ -58,7 +58,7 @@ cleanup file key = do
-- touch the symlink to have the same mtime as the file it points to
s <- liftIO $ getFileStatus file
let mtime = modificationTime s
_ <- liftIO $ touch file (TimeSpec mtime 0) False
liftIO $ touch file (TimeSpec mtime 0) False
Annex.queue "add" [Param "--"] file
return True