diff options
Diffstat (limited to 'Assistant/Threads/Upgrader.hs')
-rw-r--r-- | Assistant/Threads/Upgrader.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |