summaryrefslogtreecommitdiff
path: root/Remote/Hook.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-08-17 10:42:14 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-08-17 10:42:14 -0400
commit29826eaa3d217a722a291b30fba5f9eda98ff518 (patch)
treed1458e3ddc08bf9cfac80650b15c40da5b5b6419 /Remote/Hook.hs
parent7b7d9ed864684aa3d82640780d69c5285750ab03 (diff)
refactor
Diffstat (limited to 'Remote/Hook.hs')
-rw-r--r--Remote/Hook.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/Remote/Hook.hs b/Remote/Hook.hs
index 259a44bcd..98eeeb031 100644
--- a/Remote/Hook.hs
+++ b/Remote/Hook.hs
@@ -16,6 +16,7 @@ import Config
import Config.Cost
import Annex.UUID
import Remote.Helper.Special
+import Remote.Helper.Messages
import Utility.Env
import Messages.Progress
@@ -138,7 +139,7 @@ remove h k = runHook h "remove" k Nothing $ return True
checkKey :: Git.Repo -> HookName -> CheckPresent
checkKey r h k = do
- showAction $ "checking " ++ Git.repoDescribe r
+ showChecking r
v <- lookupHook h action
liftIO $ check v
where