X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=t%2FImages.t;h=0ee5ce683e972c388e5d40615aae9695917ac626;hb=9066ae153b15ae49b7d5832b331eed31c32ed583;hp=274766bf9de405810c3a668465299a8308b3191d;hpb=29b4f5d1283b802cd98229fd0e57a16260a29ebd;p=koha.git diff --git a/t/Images.t b/t/Images.t index 274766bf9d..0ee5ce683e 100644 --- a/t/Images.t +++ b/t/Images.t @@ -1,11 +1,35 @@ #!/usr/bin/perl + +# This file is part of Koha. +# +# Koha is free software; you can redistribute it and/or modify it +# under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. # -#Testing C4 Images +# Koha is distributed in the hope that it will be useful, but +# WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with Koha; if not, see . use Modern::Perl; -use Test::More tests => 8; + +use Test::More; use Test::MockModule; +use Module::Load::Conditional qw/check_install/; + +BEGIN { + if ( check_install( module => 'Test::DBIx::Class' ) ) { + plan tests => 8; + } else { + plan skip_all => "Need Test::DBIx::Class" + } +} + use_ok('C4::Images'); use Test::DBIx::Class { @@ -49,3 +73,5 @@ is( $imagenumbers[0], 1, 'imagenumber is 1' ); is( $imagenumbers[1], 3, 'imagenumber is 3' ); is( $imagenumbers[4], undef, 'imagenumber undef' ); + +1;