diff options
Diffstat (limited to 'Assistant')
| -rw-r--r-- | Assistant/Threads/Upgrader.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Assistant/Threads/Upgrader.hs b/Assistant/Threads/Upgrader.hs index 602d09208..2bfbe5be1 100644 --- a/Assistant/Threads/Upgrader.hs +++ b/Assistant/Threads/Upgrader.hs @@ -20,7 +20,7 @@ import Assistant.Alert import Utility.NotificationBroadcaster import qualified Annex import qualified Build.SysConfig -import qualified Git.Version +import qualified Utility.DottedVersion as DottedVersion import Types.Distribution #ifdef WITH_WEBAPP import Assistant.WebApp.Types @@ -63,9 +63,9 @@ checkUpgrade urlrenderer = do where go Nothing = debug [ "Failed to check if upgrade is available." ] go (Just d) = do - let installed = Git.Version.normalize Build.SysConfig.packageversion - let avail = Git.Version.normalize $ distributionVersion d - let old = Git.Version.normalize <$> distributionUrgentUpgrade d + let installed = DottedVersion.normalize Build.SysConfig.packageversion + let avail = DottedVersion.normalize $ distributionVersion d + let old = DottedVersion.normalize <$> distributionUrgentUpgrade d if Just installed <= old then canUpgrade High urlrenderer d else if installed < avail |