BAIL_OUT stops the entire test run - do not want that

diff --git a/t/746mssql.t b/t/746mssql.t
index b822138..dafee69 100644 (file)
--- a/t/746mssql.t
+++ b/t/746mssql.t
@@ -75,7 +75,7 @@ for my $opts_name (keys %opts) {
     }
     catch {
       if ($opts{$opts_name}{required}) {
-        BAIL_OUT "on_connect_call option '$opts_name' is not functional: $_";
+        die "on_connect_call option '$opts_name' is not functional: $_";
       }
       else {
         skip

diff --git a/t/resultset/rowparser_internals.t b/t/resultset/rowparser_internals.t
index 5bdebac..ebeb150 100644 (file)
--- a/t/resultset/rowparser_internals.t
+++ b/t/resultset/rowparser_internals.t
@@ -726,7 +726,8 @@ sub is_same_src {
   &is (@normalized, $_[2]||() ) or do {
     eval { require Test::Differences }
       ? &Test::Differences::eq_or_diff( @normalized, $_[2]||() )
-      : note ("Original sources:\n\n$got\n\n$expect\n");
-    BAIL_OUT('');
+      : note ("Original sources:\n\n$got\n\n$expect\n")
+    ;
+    exit 1;
   };
 }