Silence warning about unused paramater

dcoutts · dcoutts · commit 485b2129394d · 2009-12-29T21:16:49.000Z
diff --git a/Distribution/Simple/InstallDirs.hs b/Distribution/Simple/InstallDirs.hs
@@ -216,7 +216,7 @@ type InstallDirTemplates = InstallDirs PathTemplate
 -- Default installation directories
 
 defaultInstallDirs :: CompilerFlavor -> Bool -> Bool -> IO InstallDirTemplates
-defaultInstallDirs comp userInstall hasLibs = do
+defaultInstallDirs comp userInstall _hasLibs = do
   windowsProgramFilesDir <- getWindowsProgramFilesDir
   userInstallPrefix      <- getAppUserDataDirectory "cabal"
   lhcPrefix              <- getAppUserDataDirectory "lhc"
