[project @ 2001-07-17 15:48:21 by simonpj]

Remove trace

diff --git a/ghc/compiler/main/Packages.lhs b/ghc/compiler/main/Packages.lhs
index cad3af3..94eeb96 100644 (file)
--- a/ghc/compiler/main/Packages.lhs
+++ b/ghc/compiler/main/Packages.lhs
@@ -49,7 +49,7 @@ mungePackagePaths top_dir ps = map munge_pkg ps
 
   munge_path p 
          | Just p' <- my_prefix_match "$libdir" p = top_dir ++ p'
-         | otherwise                              = trace ("not: " ++ p) p
+         | otherwise                              = p
 \end{code}