Permalink
Browse files

Overlays.hs mapM -> mapM_ (unused result on -Werror)

  • Loading branch information...
1 parent 2593f89 commit 8c4e0ae6f85d9116c06c4f0508ec2638de17e6e7 @trofi trofi committed Dec 20, 2009
Showing with 1 addition and 1 deletion.
  1. +1 −1 Overlays.hs
View
@@ -41,7 +41,7 @@ getOverlayPath verbosity override_overlay = do
info verbosity "Not ok."
loop xs
info verbosity "There are several overlays in your configuration."
- mapM (info verbosity . (" * " ++)) mul
+ mapM_ (info verbosity . (" * " ++)) mul
info verbosity "Looking for one with a HackPort cache..."
overlay <- loop mul
info verbosity $ "I choose " ++ overlay

0 comments on commit 8c4e0ae

Please sign in to comment.