s/rawSystemPath/rawSystemVerbose/ typo.

gentoo-haskell · Jun 9, 2005 · aa44cc6 · aa44cc6
1 parent beafb5c
commit aa44cc6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Distribution/PreProcess.hs b/Distribution/PreProcess.hs
@@ -192,7 +192,7 @@ ppGreenCard' :: [String] -> BuildInfo -> LocalBuildInfo -> PreProcessor
 ppGreenCard' inputArgs bi lbi
     = maybe (ppNone "greencard") pp (withGreencard lbi)
     where pp greencard inFile outFile verbose
-              = rawSystemPath verbose greencard (["-tffi", "-o" ++ outFile, inFile] ++ inputArgs)
+              = rawSystemVerbose verbose greencard (["-tffi", "-o" ++ outFile, inFile] ++ inputArgs)
 
 -- This one is useful for preprocessors that can't handle literate source.
 -- We also need a way to chain preprocessors.