diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-03-15 11:50:40 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-03-15 11:50:40 -0400 |
| commit | 83a9bb624bcd7c5b4eee69bd91150d46c82146d8 (patch) | |
| tree | 8a85a096d61ddd212869146affee7118ca17fd9d /Command/Add.hs | |
| parent | 7b0c6177ff9e0d0f2c23f798b14f1e49128f3589 (diff) | |
fix error throwing
Diffstat (limited to 'Command/Add.hs')
| -rw-r--r-- | Command/Add.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Add.hs b/Command/Add.hs index 09fff7cff..a577203bf 100644 --- a/Command/Add.hs +++ b/Command/Add.hs @@ -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 |