Bug 27149: Unit tests
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
(cherry picked from commit 1ae737603f)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
parent
1029df2743
commit
de9bb3872d
|
|
@ -17,7 +17,7 @@ $schema->storage->txn_begin;
|
|||
|
||||
subtest 'add_item_status' => sub {
|
||||
|
||||
plan tests => 2;
|
||||
plan tests => 3;
|
||||
|
||||
## FIRST ITEM HAS ALL THE STATUSES ##
|
||||
my $item_1 = $builder->build_sample_item(
|
||||
|
|
@ -29,8 +29,9 @@ subtest 'add_item_status' => sub {
|
|||
withdrawn => 1,
|
||||
}
|
||||
);
|
||||
my ( $itemtag, $itemsubfield ) = C4::Biblio::GetMarcFromKohaField( "items.itemnumber" );
|
||||
my $item_marc_1 = C4::Items::GetMarcItem( $item_1->biblionumber, $item_1->itemnumber );
|
||||
my $item_field_1 = scalar $item_marc_1->field('952');
|
||||
my $item_field_1 = scalar $item_marc_1->field($itemtag);
|
||||
$builder->build({ source => 'Reserve', value=> { itemnumber => $item_1->itemnumber } });
|
||||
$builder->build({ source => 'Branchtransfer', value=> { itemnumber => $item_1->itemnumber, datearrived => undef } });
|
||||
## END FIRST ITEM ##
|
||||
|
|
@ -38,7 +39,7 @@ subtest 'add_item_status' => sub {
|
|||
## SECOND ITEM HAS NO STATUSES ##
|
||||
my $item_2 = $builder->build_sample_item;
|
||||
my $item_marc_2 = C4::Items::GetMarcItem( $item_2->biblionumber, $item_2->itemnumber );
|
||||
my $item_field_2 = scalar $item_marc_2->field('952');
|
||||
my $item_field_2 = scalar $item_marc_2->field($itemtag);
|
||||
## END SECOND ITEM ##
|
||||
|
||||
# Create the responder
|
||||
|
|
@ -52,6 +53,8 @@ subtest 'add_item_status' => sub {
|
|||
$args->{HANDLE}->add_item_status($item_field_2);
|
||||
is($item_field_2->subfield('k'),'Available',"Available status added as expected");
|
||||
|
||||
is($item_field_2->subfield( $itemsubfield ), $item_2->itemnumber, "Itemnumber not removed when status added");
|
||||
|
||||
};
|
||||
|
||||
$schema->storage->txn_rollback;
|
||||
|
|
|
|||
Loading…
Reference in New Issue