diff --git a/ChangeLog b/ChangeLog
index 7960c0f27..d28ebf526 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2010-03-31  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
+
+	* Tools/sogo-tool.m (-run): return a proper return code rather
+	than "NO".
+
 2010-03-31  Francis Lachapelle  <flachapelle@inverse.ca>
 
 	* SoObjects/Mailer/SOGoDraftObject.m (+initialize): updated the
diff --git a/Tools/sogo-tool.m b/Tools/sogo-tool.m
index 0aae09c2f..f2173c326 100644
--- a/Tools/sogo-tool.m
+++ b/Tools/sogo-tool.m
@@ -209,7 +209,7 @@
         rc = NO;
     }
 
-  return NO;
+  return rc;
 }
 
 @end