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

1 files changed, 5 insertions, 3 deletions

diff --git a/travis/run-tests.pl b/travis/run-tests.pl
index 1b3af77..960af2e 100755
--- 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;