Merge pull request #18 from juhp/master

fix typo of mismatches
This commit is contained in:
Michael Snoyman 2012-12-04 22:45:24 -08:00
commit af5e0104d4

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