Lines 1-7
Link Here
|
1 |
#!/usr/bin/perl |
1 |
#!/usr/bin/perl |
2 |
|
2 |
|
3 |
use Modern::Perl; |
3 |
use Modern::Perl; |
4 |
use Test::More tests => 15; |
4 |
use Test::More tests => 16; |
5 |
use MARC::Record; |
5 |
use MARC::Record; |
6 |
use MARC::Field; |
6 |
use MARC::Field; |
7 |
use DateTime; |
7 |
use DateTime; |
Lines 31-36
my $record = MARC::Record->new();
Link Here
|
31 |
$record->append_fields( |
31 |
$record->append_fields( |
32 |
MARC::Field->new('100', ' ', ' ', a => 'Moffat, Steven'), |
32 |
MARC::Field->new('100', ' ', ' ', a => 'Moffat, Steven'), |
33 |
MARC::Field->new('245', ' ', ' ', a => 'Silence in the library'), |
33 |
MARC::Field->new('245', ' ', ' ', a => 'Silence in the library'), |
|
|
34 |
MARC::Field->new('942', ' ', ' ', c => 'ITEMTYPE_T'), |
34 |
); |
35 |
); |
35 |
my ($biblionumber, undef) = C4::Biblio::AddBiblio($record, ''); |
36 |
my ($biblionumber, undef) = C4::Biblio::AddBiblio($record, ''); |
36 |
|
37 |
|
Lines 258-260
C4::Items::ToggleNewStatus( { rules => \@rules } );
Link Here
|
258 |
$modified_item = C4::Items::GetItem( $itemnumber ); |
259 |
$modified_item = C4::Items::GetItem( $itemnumber ); |
259 |
is( $modified_item->{new}, 'new_updated_value', q|ToggleNewStatus: conditions multiple: the 2 conditions match, the new value is updated|); |
260 |
is( $modified_item->{new}, 'new_updated_value', q|ToggleNewStatus: conditions multiple: the 2 conditions match, the new value is updated|); |
260 |
|
261 |
|
261 |
- |
262 |
@rules = ( |
|
|
263 |
{ |
264 |
conditions => [ |
265 |
{ |
266 |
field => 'biblioitems.itemtype', |
267 |
value => 'ITEMTYPE_T', |
268 |
}, |
269 |
], |
270 |
substitutions => [ |
271 |
{ |
272 |
field => 'items.new', |
273 |
value => 'another_new_updated_value', |
274 |
}, |
275 |
], |
276 |
duration => '0', |
277 |
}, |
278 |
); |
279 |
|
280 |
C4::Items::ToggleNewStatus( { rules => \@rules } ); |
281 |
|
282 |
$modified_item = C4::Items::GetItem( $itemnumber ); |
283 |
is( $modified_item->{new}, 'another_new_updated_value', q|ToggleNewStatus: conditions on biblioitems|); |