Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 13853: (QA followup) Add unit tests for branch getting methods

Browse source 
Signed-off-by: Jonathan Druart <jonathan.druart@koha-community.org>
Signed-off-by: Tomas Cohen Arazi <tomascohen@unc.edu.ar>
This commit is contained in:
Kyle Hall 2015-06-25 14:56:18 -04:00 committed by Tomas Cohen Arazi
parent 7135bae0bb
commit ae82953138
1 changed files with 29 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

30
t/db_dependent/Items.t
View file

@ -23,10 +23,11 @@ use C4::Biblio;
use C4::Branch;
use Koha::Database;
use Test::More tests => 6;
use Test::More tests => 8;
BEGIN {
use_ok('C4::Items');
use_ok('Koha::Items');
}
my $dbh = C4::Context->dbh;
@ -389,6 +390,33 @@ subtest 'SearchItems test' => sub {
$dbh->rollback;
};
subtest 'Koha::Item(s) tests' => sub {
plan tests => 5;
# Start transaction
my $schema = Koha::Database->new()->schema();
$schema->storage->txn_begin();
$dbh->{RaiseError} = 1;
# Create a biblio and item for testing
C4::Context->set_preference('marcflavour', 'MARC21');
my ($bibnum, $bibitemnum) = get_biblio();
my ($item_bibnum, $item_bibitemnum, $itemnumber) = AddItem({ homebranch => $branch1, holdingbranch => $branch2 } , $bibnum);
# Get item.
my $item = Koha::Items->find( $itemnumber );
ok( $item, "Got Koha::Item" );
my $homebranch = $item->home_branch();
ok( $homebranch, "Got Koha::Branch from home_branch method" );
is( $homebranch->branchcode(), $branch1, "Home branch code matches homebranch" );
my $holdingbranch = $item->holding_branch();
ok( $holdingbranch, "Got Koha::Branch from holding_branch method" );
is( $holdingbranch->branchcode(), $branch2, "Home branch code matches holdingbranch" );
};
# Helper method to set up a Biblio.
sub get_biblio {
my $bib = MARC::Record->new();