Update Stackage/CheckPlan.hs

fix typo of mismatches
This commit is contained in:
Jens Petersen 2012-12-05 15:33:31 +09:00
parent 1ffd48f691
commit 2ba9a9f487

View File

@ -27,7 +27,7 @@ checkPlan settings ii = do
let dryRun = sort $ filter notOptionalCore $ map (takeWhile (/= ' ')) $ drop 2 $ lines dryRun'
let mismatches = getMismatches dryRun (filter notOptionalCore $ iiPackageList ii)
unless (null mismatches) $ do
putStrLn "Found the following mismtaches"
putStrLn "Found the following mismatches"
mapM_ print mismatches
exitWith $ ExitFailure 1
where