From 44baa7b30697d98fcc620a1e84713fc643f80ebe Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 15 May 2017 17:38:22 -0400 Subject: [PATCH] rename prompt since Messages added a function by that name --- Assistant/Threads/SanityChecker.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Assistant/Threads/SanityChecker.hs b/Assistant/Threads/SanityChecker.hs index 8169695115..43812e5d41 100644 --- a/Assistant/Threads/SanityChecker.hs +++ b/Assistant/Threads/SanityChecker.hs @@ -257,9 +257,9 @@ checkOldUnused urlrenderer = go =<< annexExpireUnused <$> liftAnnex Annex.getGit where go (Just Nothing) = noop go (Just (Just expireunused)) = expireUnused (Just expireunused) - go Nothing = maybe noop prompt =<< describeUnusedWhenBig + go Nothing = maybe noop promptconfig =<< describeUnusedWhenBig - prompt msg = + promptconfig msg = #ifdef WITH_WEBAPP do button <- mkAlertButton True (T.pack "Configure") urlrenderer ConfigUnusedR