subunit: non-zero exit code if one or more testsuites failed.

diff --git a/selftest/filter-subunit.pl b/selftest/filter-subunit.pl
index 5a2e5e38ef0af4f7bdb01bc1eecbb45d7927b0fc..9ebc67778f4dc54021db6c0fe54e6b3368dd5df6 100755 (executable)
--- a/selftest/filter-subunit.pl
+++ b/selftest/filter-subunit.pl
@@ -94,6 +94,4 @@ my $statistics = {
 my $msg_ops = new Subunit::Filter($opt_prefix, \@expected_failures, 
                                      $opt_strip_ok_output);
 
-parse_results($msg_ops, $statistics, *STDIN);
-
-0;
+exit(parse_results($msg_ops, $statistics, *STDIN));