diff options
Diffstat (limited to 'Command')
| -rw-r--r-- | Command/Unused.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Unused.hs b/Command/Unused.hs index 28a26f82c..fecfec742 100644 --- a/Command/Unused.hs +++ b/Command/Unused.hs @@ -88,7 +88,7 @@ unusedKeys = do -- Tmp files that are dups of content already present can simply -- be removed. - _ <- liftIO $ mapM (\t -> removeFile $ gitAnnexTmpLocation g t) duptmp + liftIO $ mapM_ (\t -> removeFile $ gitAnnexTmpLocation g t) duptmp return (unused, staletmp) |