Permalink
Browse files

removing debug code.

  • Loading branch information...
1 parent 259c12e commit e5219c2a6293bdb2934115f9d17951d8be6d0847 @kazu-yamamoto committed Mar 1, 2013
Showing with 1 addition and 2 deletions.
  1. +1 −2 Commands.hs
View
@@ -98,7 +98,6 @@ pkgConfOpt opts = case getSandbox opts of
Nothing -> return ""
Just path -> do
ghcver <- ghcVersion
- print ghcver
pkgConf <- getPackageConf path
let pkgOpt | ghcver >= 706 = "--package-db="
| otherwise = "--package-conf="
@@ -116,7 +115,7 @@ check _ _ opts = do
pkgconf <- pkgConfOpt opts
void . system $ script pkgconf
where
- script pkgconf = "ghc-pkg check -v " ++ pkgconf
+ script pkgconf = "ghc-pkg check -v " ++ pkgconf
----------------------------------------------------------------

0 comments on commit e5219c2

Please sign in to comment.