ignore errors during explain-put when building a release

frioux · Jul 19, 2019 · 0cf7213 · 0cf7213
1 parent 439eb26
commit 0cf7213
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/maint/explain-out b/maint/explain-out
@@ -15,5 +15,10 @@ if ($engine eq 'SQLite') {
    $s->deploy;
    print Dumper($s->resultset('Gnarly')->explain)
 } else {
-   print Dumper(A::Util::connect($engine, $engine)->resultset('Gnarly')->explain)
+    eval {
+        print Dumper(A::Util::connect($engine, $engine)->resultset('Gnarly')->explain)
+    };
+    if ($@) {
+        print "Problem during maint/explain-out, but probably not fatal: $@";
+    }
 }