summaryrefslogtreecommitdiff
path: root/Command/Fsck.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2014-03-13 19:06:26 -0400
committerGravatar Joey Hess <joey@kitenet.net>2014-03-13 19:06:26 -0400
commitc1c5ff5626edbd4474b327dc8b8e66bd218b3e5e (patch)
tree3eca00d56bac0fc4fb7674375ea56f039273d074 /Command/Fsck.hs
parent4727e1dc1de161ad9517bcb4c101c66ac632284f (diff)
clean up cleanup action enumeration
Diffstat (limited to 'Command/Fsck.hs')
-rw-r--r--Command/Fsck.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs
index 059f3e91e..88a9915c4 100644
--- a/Command/Fsck.hs
+++ b/Command/Fsck.hs
@@ -29,6 +29,7 @@ import Utility.DataUnits
import Utility.FileMode
import Config
import Types.Key
+import Types.CleanupActions
import Utility.HumanTime
import Git.FilePath
import Utility.PID
@@ -93,7 +94,7 @@ getIncremental = do
checkschedule Nothing = error "bad --incremental-schedule value"
checkschedule (Just delta) = do
- Annex.addCleanup "" $ do
+ Annex.addCleanup FsckCleanup $ do
v <- getStartTime
case v of
Nothing -> noop