--- a/common/tools/generate_diamonds_tags_xml.pl	Mon Oct 19 12:23:25 2009 +0100
+++ b/common/tools/generate_diamonds_tags_xml.pl	Mon Oct 19 12:24:43 2009 +0100
@@ -29,6 +29,7 @@
 if ($help or !$outputfile)
 {
 	print "Usage: perl generate_diamonds_tags_xml.pl --tags COMMA_SEPARATED_TAG_LIST --output OUTPUT_FILE\n";
+	exit(0);
 }
 
 open(FILE, ">$outputfile");