[project @ 2005-02-20 01:36:23 by ross]
[ghc-hetmet.git] / ghc / compiler / ghci / Linker.lhs
index bb968ff..7df178d 100644 (file)
@@ -804,7 +804,7 @@ loadFrameworks pkg = return ()
 loadFrameworks pkg = mapM_ load frameworks
   where
     fw_dirs    = Packages.frameworkDirs pkg
-    frameworks = Packages.extraFrameworks pkg
+    frameworks = Packages.frameworks pkg
 
     load fw = do  r <- loadFramework fw_dirs fw
                  case r of