[project @ 2004-11-12 15:06:36 by simonmar]

darwin-only fix

diff --git a/ghc/compiler/main/DriverState.hs b/ghc/compiler/main/DriverState.hs
index 58c85a4..f92f295 100644 (file)
--- a/ghc/compiler/main/DriverState.hs
+++ b/ghc/compiler/main/DriverState.hs
@@ -443,7 +443,7 @@ getPackageFrameworkPath pkgs = do
 getPackageFrameworks  :: [PackageName] -> IO [String]
 getPackageFrameworks pkgs = do
   ps <- getExplicitPackagesAnd pkgs
-  return (concatMap extra_frameworks ps)
+  return (concatMap extraFrameworks ps)
 #endif
 
 -- -----------------------------------------------------------------------------