aboutsummaryrefslogtreecommitdiff
path: root/app
diff options
context:
space:
mode:
Diffstat (limited to 'app')
-rw-r--r--app/Server.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/app/Server.hs b/app/Server.hs
index 3564183..369221a 100644
--- a/app/Server.hs
+++ b/app/Server.hs
@@ -853,7 +853,7 @@ loadPackages config _ = do
else return Nothing
where
packageName :: HCE.PackageInfo HCE.CompactModuleInfo -> PackageName
- packageName (HCE.PackageInfo {id = pkgId}) = PackageName $ HCE.packageIdToText pkgId
+ packageName (HCE.PackageInfo {id = HCE.PackageId name _}) = PackageName name
packageVersion :: HCE.PackageInfo HCE.CompactModuleInfo -> Version
packageVersion (HCE.PackageInfo {id = HCE.PackageId _ version}) = version