From e42c76da53277aef1bc1d52d96e5619f90620afc Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Thu, 9 Feb 2017 11:48:08 +0000 Subject: [PATCH] Bug 18089 - Unit test --- t/XSLT.t | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/t/XSLT.t b/t/XSLT.t index 21c2e93..14f53a3 100755 --- a/t/XSLT.t +++ b/t/XSLT.t @@ -17,7 +17,7 @@ use Modern::Perl; -use Test::More tests => 8; +use Test::More tests => 9; use File::Temp; use File::Path qw/make_path/; @@ -62,4 +62,8 @@ is(find_and_slurp($dir, 'test', 'fr-FR'), 'Theme test, language en', 'Fell ba is(find_and_slurp($dir, 'nope', 'es-ES'), 'Theme prog, language es-ES', 'Fell back to prog/es-ES for nope/es-ES'); is(find_and_slurp($dir, 'nope', 'fr-FR'), 'Theme prog, language en', 'Fell back to prog/en for nope/fr-FR'); +my $matching_string = q{0}; +my $sysprefs_xml = C4::XSLT::get_xslt_sysprefs(); +ok( $sysprefs_xml =~ m/$matching_string/ ); + 1; -- 2.1.4