Lines 37-43
use_ok('Koha::Illrequests');
Link Here
|
37 |
|
37 |
|
38 |
subtest 'Basic object tests' => sub { |
38 |
subtest 'Basic object tests' => sub { |
39 |
|
39 |
|
40 |
plan tests => 21; |
40 |
plan tests => 22; |
41 |
|
41 |
|
42 |
$schema->storage->txn_begin; |
42 |
$schema->storage->txn_begin; |
43 |
|
43 |
|
Lines 74-79
subtest 'Basic object tests' => sub {
Link Here
|
74 |
"Accessurl getter works."); |
74 |
"Accessurl getter works."); |
75 |
is($illrq_obj->cost, $illrq->{cost}, |
75 |
is($illrq_obj->cost, $illrq->{cost}, |
76 |
"Cost getter works."); |
76 |
"Cost getter works."); |
|
|
77 |
is($illrq_obj->price_paid, $illrq->{price_paid}, |
78 |
"Price_paid getter works."); |
77 |
is($illrq_obj->notesopac, $illrq->{notesopac}, |
79 |
is($illrq_obj->notesopac, $illrq->{notesopac}, |
78 |
"Notesopac getter works."); |
80 |
"Notesopac getter works."); |
79 |
is($illrq_obj->notesstaff, $illrq->{notesstaff}, |
81 |
is($illrq_obj->notesstaff, $illrq->{notesstaff}, |
80 |
- |
|
|