From de7b76e48fff5c85aca088663f239580233ce637 Mon Sep 17 00:00:00 2001
From: David Waern <david.waern@gmail.com>
Date: Sat, 28 Feb 2009 00:53:55 +0000
Subject: Do not show package name in warning message
---
src/Haddock/Interface/Rename.hs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
(limited to 'src')
diff --git a/src/Haddock/Interface/Rename.hs b/src/Haddock/Interface/Rename.hs
index 3e4f6fbc..05bb2ccf 100644
--- a/src/Haddock/Interface/Rename.hs
+++ b/src/Haddock/Interface/Rename.hs
@@ -68,7 +68,7 @@ renameInterface renamingEnv warnings mod =
-- report things that we couldn't link to. Only do this for non-hidden
-- modules.
unless (OptHide `elem` ifaceOptions mod || null strings || not warnings) $
- tell ["Warning: " ++ show (ppr (ifaceMod mod) defaultUserStyle) ++
+ tell ["Warning: " ++ moduleString (ifaceMod mod) ++
": could not find link destinations for:\n"++
" " ++ concat (map (' ':) strings) ]
--
cgit v1.2.3