Bug 24756: Show the warnings on Jenkins

Temporary measure to see which warnings Jenkins got while we cannot
reproduce them ourselves on D8, D9 and D10.

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
Marcel de Rooy 2020-03-02 09:00:57 +00:00 committed by Martin Renvoize
parent c497d4f5a6
commit 1e7819f742
Signed by: martin.renvoize
GPG key ID: 422B469130441A0F

View file

@ -18,6 +18,7 @@
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
use Data::Dumper qw/Dumper/;
use File::Temp qw/tempfile/;
use Test::More tests => 8;
use Test::Warn;
@ -117,7 +118,7 @@ $engine->print_warns(1);
my @warn;
local $SIG{__WARN__} = sub { push @warn, $_[0]; };
$output= $engine->transform({ xml => "<ignored/>", code => $xslt });
is( ( grep { /failed to load external/ } @warn ), 1, 'Expected import error' );
is( ( grep { /failed to load external/ } @warn ), 1, 'Expected import error. Additional info: '.Dumper(@warn) );
is( ( grep { /read_net/ } @warn ), 0, 'No read_net warn for remote import' );
}