From 14ccfc0abc1aa3130b07e7bd981b266f2eccd751 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 22 Nov 2013 23:12:06 -0400 Subject: assistant restart on upgrade --- Assistant/Threads/Upgrader.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Assistant/Threads/Upgrader.hs') diff --git a/Assistant/Threads/Upgrader.hs b/Assistant/Threads/Upgrader.hs index 94f709e16..7a95a711d 100644 --- a/Assistant/Threads/Upgrader.hs +++ b/Assistant/Threads/Upgrader.hs @@ -73,7 +73,7 @@ checkUpgrade urlrenderer = do canUpgrade :: AlertPriority -> UrlRenderer -> GitAnnexDistribution -> Assistant () canUpgrade urgency urlrenderer d = do #ifdef WITH_WEBAPP - button <- mkAlertButton False (T.pack "Upgrade") urlrenderer (ConfigUpgradeR d) + button <- mkAlertButton True (T.pack "Upgrade") urlrenderer (ConfigStartUpgradeR d) void $ addAlert (canUpgradeAlert urgency button) #else noop -- cgit v1.2.3