From: Matt S Trout Date: Sun, 21 Apr 2019 02:14:51 +0000 (+0000) Subject: make stability test try and invoke diff X-Git-Tag: v2.000000~3^2~182 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e158ec37c3a5bfed7393023176bc0f13ae9a7bfe;p=dbsrgits%2FSQL-Abstract.git make stability test try and invoke diff --- diff --git a/lib/SQL/Abstract/Test.pm b/lib/SQL/Abstract/Test.pm index 0d49100..4f12e06 100644 --- a/lib/SQL/Abstract/Test.pm +++ b/lib/SQL/Abstract/Test.pm @@ -33,7 +33,8 @@ use SQL::Abstract::Tree; require Path::Tiny; Path::Tiny->new('e1')->spew($d1); Path::Tiny->new('e2')->spew($d2); - die "Wrote e1 and e2, bailing out"; + system('diff -u e1 e2 1>&2'); + die "Differences between e1 and e2, bailing out"; }; return $e1; };