From: Peter Rabbitson <ribasushi@cpan.org>
Date: Wed, 27 Feb 2013 09:35:17 +0000 (+0100)
Subject: BAIL_OUT stops the entire test run - do not want that
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e81b50f4f429e1119fc6efb369122225fa7557d8;p=dbsrgits%2FDBIx-Class-Historic.git

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
--- 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
--- 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;
   };
 }