View | Details | Raw Unified | Return to bug 18290
Collapse All | Expand All

(-)a/t/db_dependent/Koha/Object.t (-3 / +2 lines)
Lines 159-168 subtest 'TO_JSON tests' => sub { Link Here
159
    my $lost = $patron->TO_JSON()->{lost};
159
    my $lost = $patron->TO_JSON()->{lost};
160
    my $gonenoaddress = $patron->TO_JSON->{gonenoaddress};
160
    my $gonenoaddress = $patron->TO_JSON->{gonenoaddress};
161
161
162
    ok( $lost->isa('Mojo::JSON::_Bool'), 'Boolean attribute type is correct' );
162
    ok( $lost->isa('JSON::PP::Boolean'), 'Boolean attribute type is correct' );
163
    is( $lost, 1, 'Boolean attribute value is correct (true)' );
163
    is( $lost, 1, 'Boolean attribute value is correct (true)' );
164
164
165
    ok( $gonenoaddress->isa('Mojo::JSON::_Bool'), 'Boolean attribute type is correct' );
165
    ok( $gonenoaddress->isa('JSON::PP::Boolean'), 'Boolean attribute type is correct' );
166
    is( $gonenoaddress, 0, 'Boolean attribute value is correct (false)' );
166
    is( $gonenoaddress, 0, 'Boolean attribute value is correct (false)' );
167
167
168
    ok( !isvstring($patron->borrowernumber), 'Integer values are not coded as strings' );
168
    ok( !isvstring($patron->borrowernumber), 'Integer values are not coded as strings' );
169
- 

Return to bug 18290