Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

removing debug code.

  • Loading branch information...
commit e5219c2a6293bdb2934115f9d17951d8be6d0847 1 parent 259c12e
@kazu-yamamoto authored
Showing with 1 addition and 2 deletions.
  1. +1 −2  Commands.hs
View
3  Commands.hs
@@ -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
----------------------------------------------------------------
Please sign in to comment.
Something went wrong with that request. Please try again.