From 9b3069cb3d35dd67649dec8b709f835df63e3182 Mon Sep 17 00:00:00 2001
From: Lemmih <lemmih@gmail.com>
Date: Mon, 29 Jan 2007 03:20:59 +0000
Subject: [PATCH] Comment.

---
 src/System/Plugins/Env.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/System/Plugins/Env.hs b/src/System/Plugins/Env.hs
index 87b3946..7911b35 100644
--- a/src/System/Plugins/Env.hs
+++ b/src/System/Plugins/Env.hs
@@ -284,7 +284,8 @@ addPkgConf f = do
 union :: PkgEnvs -> [PackageConfig] -> PkgEnvs
 union ls ps' = 
         let fm = emptyFM -- new FM for this package.conf
-        in foldr (\p fm' -> if packageName_ p == "base"
+        in foldr (\p fm' -> if packageName_ p == "base" -- ghc doesn't supply a version with 'base'
+                                                        -- for some reason.
                             then addToFM fm' (packageName_ p) p
                             else addToFM fm' (packageName p) p) fm ps' : ls