From: simonmar <unknown>
Date: Fri, 12 Nov 2004 15:06:36 +0000 (+0000)
Subject: [project @ 2004-11-12 15:06:36 by simonmar]
X-Git-Tag: Initial_conversion_from_CVS_complete~1431
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=9e69f47dc584b27abdda947ed85cd1d295b9401a;p=ghc-hetmet.git

[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
--- 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
 
 -- -----------------------------------------------------------------------------