X-Git-Url: http://git.cielonegro.org/gitweb.cgi?a=blobdiff_plain;f=tools%2Ffind-changed.pl;h=2183f5c448fa361009e34eb881e744f0128994d3;hb=3b85db615b847de2cd657ed832ba1689ba2f9d4f;hp=7f9e084b22bf1a21f3721575a98176b263323864;hpb=013b2d3103f916fda0ba25a85673c4a45da72ce6;p=sugar.git

diff --git a/tools/find-changed.pl b/tools/find-changed.pl
index 7f9e084..2183f5c 100644
--- a/tools/find-changed.pl
+++ b/tools/find-changed.pl
@@ -8,6 +8,8 @@ use File::Spec;
 use File::Compare;
 
 sub main {
+    my $found_updated;
+
     while (defined(my $rel = <>)) {
         chomp $rel;
         my $saved = rel2saved($rel);
@@ -23,6 +25,10 @@ sub main {
             print "M $rel\n";
         }
     }
+
+    if ($found_updated) {
+        exit 1;
+    }
 }
 
 main();