diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2016-04-21 14:32:42 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-04-21 14:32:42 -0400 |
| commit | e896c249fa876cbf6f281ce9e934bde6cb92e345 (patch) | |
| tree | b1dad64033da2442bd715a9cbe6dcab4ad2086b8 /Assistant | |
| parent | 451e2994fbdc89251d1a5bf73cce475c62b05838 (diff) | |
use more general module
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 |