diff --git a/t/Boolean.t b/t/Boolean.t index af5c8b71d2..0f04913cae 100755 --- a/t/Boolean.t +++ b/t/Boolean.t @@ -2,7 +2,7 @@ use strict; use warnings; -use Test::More tests => 12; +use Test::More tests => 13; BEGIN { use_ok( 'C4::Boolean', qw( true_p ) ); } diff --git a/t/SIP_ILS.t b/t/SIP_ILS.t index 4a3ee70774..32ec7d4d67 100755 --- a/t/SIP_ILS.t +++ b/t/SIP_ILS.t @@ -6,11 +6,24 @@ use strict; use warnings; -use Test::More tests => 1; +use Test::More tests => 4; BEGIN { use FindBin; use lib "$FindBin::Bin/../C4/SIP"; use_ok('C4::SIP::ILS'); -} +}; +my $transaction = ILS::Transaction::RenewAll->new(); + +$transaction->patron(my $patron = ILS::Patron->new(23529000120056)); + +ok(defined $patron, "patron code: 23529000120056 is valid"); + +my $transaction2 = ILS::Transaction::RenewAll->new(); +$transaction2->patron(my $patron2 = ILS::Patron->new("ABCDE12345")); + +#This test assumes that the patron code ABCDE12345 is invalid +ok(!defined $patron2, "patron code: ABCDE12345 is invalid"); + +ok($transaction->do_renew_all(), "items renewed correctly");