Bug 17226 - Fix unit tests

Signed-off-by: Brendan Gallagher <brendan@bywatersolutions.com>
This commit is contained in:
Kyle Hall 2016-10-10 17:30:43 +00:00 committed by Brendan Gallagher
parent b7d25c83e6
commit a1a0bdd798

View file

@ -50,13 +50,13 @@ is( $object2->surname(), "Test Patron Surname 3", "Bad Set does not set field" )
is( $ret, 0, "Set returns 0 when passed a bad property" );
warning_is { $ret = $object->bork() }
"No method bork!",
"Expected 'No method bork!' caught for getter.";
"The method bork is not covered by tests or does not exist!",
"Expected 'The method bork is not covered by tests or does not exist!' caught for getter.";
ok( ! defined $ret, 'Bad getter returns undef' );
warning_is { $ret = $object->bork('bork') }
"No method bork!",
"Expected 'No method bork!' caught for setter.";
"The method bork is not covered by tests or does not exist!",
"Expected 'The method bork is not covered by tests or does not exist!' caught for setter.";
ok( ! defined $ret, 'Bad setter returns undef' );
my $patron = Koha::Patron->new(