|
Lines 2-8
Link Here
|
| 2 |
use strict; |
2 |
use strict; |
| 3 |
use warnings; |
3 |
use warnings; |
| 4 |
|
4 |
|
| 5 |
use Test::More tests => 12; |
5 |
use Test::More tests => 13; |
| 6 |
|
6 |
|
| 7 |
BEGIN { use_ok( 'C4::Boolean', qw( true_p ) ); } |
7 |
BEGIN { use_ok( 'C4::Boolean', qw( true_p ) ); } |
| 8 |
|
8 |
|
|
Lines 19-21
is( true_p('YES'), '1', 'verified case insensitivity' );
Link Here
|
| 19 |
|
19 |
|
| 20 |
is( true_p(undef), undef, 'recognizes undefined as not boolean' ); |
20 |
is( true_p(undef), undef, 'recognizes undefined as not boolean' ); |
| 21 |
is( true_p('foo'), undef, 'recognizes \'foo\' as not boolean' ); |
21 |
is( true_p('foo'), undef, 'recognizes \'foo\' as not boolean' ); |
| 22 |
- |
22 |
is( true_p([]), undef, 'recognizes a reference as not a boolean' ); |