Run all travis tests and expose the final result as exit code

diff --git a/travis/run-tests.pl b/travis/run-tests.pl
index 1b3af77b4d0a0f1640e88fe809e3e174e7750cc4..960af2e6f5c7838dc541c5de324e14b683d12b04 100755 (executable)
--- a/travis/run-tests.pl
+++ b/travis/run-tests.pl
@@ -44,14 +44,16 @@ sub TestCase {
 }
 
 my $testcases = 'testcases';
-my $testresults = 1;
+my $testresults = 0;
 
 opendir(my $dir, $testcases) or die "Could not open directory $testcases: $!";
 
 while (my $entry = readdir($dir)) {
     next unless (-d "$testcases/$entry");
     next if ($entry =~ m/^\./);
-    $testresults = $testresults && TestCase("$testcases/$entry");
+    if (not TestCase("$testcases/$entry") ) {
+        $testresults = 1;
+    }
 }
 closedir($dir);
-exit 0;
+exit $testresults;