From 087442a7d28663bdcfb06dbf018a47cd41eb84e9 Mon Sep 17 00:00:00 2001
From: lemmih <lemmih@gmail.com>
Date: Fri, 27 May 2005 11:57:33 +0000
Subject: [PATCH] s/not changed/changed/ typo in 'recompileAll'.

---
 src/plugins/System/Plugins/Make.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/plugins/System/Plugins/Make.hs b/src/plugins/System/Plugins/Make.hs
index 251cb15..470c3e2 100644
--- a/src/plugins/System/Plugins/Make.hs
+++ b/src/plugins/System/Plugins/Make.hs
@@ -117,7 +117,7 @@ hasChanged' suffices m@(Module {path = p})
            _ -> return True
 
 --
--- |Like 'makeAll' but with better recompilation checks since module dependencies are known.
+-- |Same as 'makeAll' but with better recompilation checks since module dependencies are known.
 --
 recompileAll :: Module -> [Arg] -> IO MakeStatus
 recompileAll = recompileAll' ["hs","lhs"]
@@ -125,7 +125,7 @@ recompileAll = recompileAll' ["hs","lhs"]
 recompileAll' :: [String] -> Module -> [Arg] -> IO MakeStatus
 recompileAll' suffices m args
     = do changed <- hasChanged m
-         if not changed
+         if changed
             then do mbSource <- findFile suffices (path m)
                     case mbSource of
                       Nothing