Merge bk-internal.mysql.com:/home/bk/mysql-4.0

into here.mwagner.org:/Volumes/BK/mysql-4.0

1 files changed, 7 insertions, 1 deletions

diff --git a/Build-tools/my_md5sum b/Build-tools/my_md5sum
index 481a665af1a..f4ac2f7d674 100755
--- a/Build-tools/my_md5sum
+++ b/Build-tools/my_md5sum
@@ -24,7 +24,8 @@ BEGIN
 use Digest::MD5;
 use Getopt::Long;
 
-my $VER= "1.2";
+my $VER= "1.3";
+my $EXIT= 0;
 
 #
 # Strip the leading path info off the program name ($0). We want 'my_md5sum'
@@ -78,6 +79,9 @@ if ($opt_check)
 		# Print an error message if they don't match, else print OK
 		print "$checkfile: FAILED\n" if $digest ne $checksum;
 		print "$checkfile: OK\n" if $digest eq $checksum;
+
+                # Set the exit() status to non-zero if FAILED
+                $EXIT= 1 if $digest ne $checksum;
 	}
 }
 # Else generate the MD5 digest to STDOUT
@@ -91,6 +95,8 @@ else
 	}
 }
 
+exit($EXIT);
+
 
 #
 # This routine generates the MD5 digest of a file