fix typo: TH.ModName -> TH.PkgName
authorSimon Marlow <marlowsd@gmail.com>
Mon, 18 May 2009 12:04:57 +0000 (12:04 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Mon, 18 May 2009 12:04:57 +0000 (12:04 +0000)
compiler/hsSyn/Convert.lhs

index 9eb1e9a..fc915db 100644 (file)
@@ -875,7 +875,7 @@ mk_ghc_ns TH.VarName   = OccName.varName
 mk_mod :: TH.ModName -> ModuleName
 mk_mod mod = mkModuleName (TH.modString mod)
 
-mk_pkg :: TH.ModName -> PackageId
+mk_pkg :: TH.PkgName -> PackageId
 mk_pkg pkg = stringToPackageId (TH.pkgString pkg)
 
 mk_uniq :: Int# -> Unique