|
Lines 39-45
use_ok('Koha::Illrequests');
Link Here
|
| 39 |
|
39 |
|
| 40 |
subtest 'Basic object tests' => sub { |
40 |
subtest 'Basic object tests' => sub { |
| 41 |
|
41 |
|
| 42 |
plan tests => 25; |
42 |
plan tests => 24; |
| 43 |
|
43 |
|
| 44 |
$schema->storage->txn_begin; |
44 |
$schema->storage->txn_begin; |
| 45 |
|
45 |
|
|
Lines 62-69
subtest 'Basic object tests' => sub {
Link Here
|
| 62 |
"Branchcode getter works."); |
62 |
"Branchcode getter works."); |
| 63 |
is($illrq_obj->status, $illrq->{status}, |
63 |
is($illrq_obj->status, $illrq->{status}, |
| 64 |
"Status getter works."); |
64 |
"Status getter works."); |
| 65 |
is($illrq_obj->status_alias, $illrq->{status_alias}, |
|
|
| 66 |
"Status_alias getter works."); |
| 67 |
is($illrq_obj->placed, $illrq->{placed}, |
65 |
is($illrq_obj->placed, $illrq->{placed}, |
| 68 |
"Placed getter works."); |
66 |
"Placed getter works."); |
| 69 |
is($illrq_obj->replied, $illrq->{replied}, |
67 |
is($illrq_obj->replied, $illrq->{replied}, |
| 70 |
- |
|
|