From 60d9ad5cc770c572fc1a132b952b37492ca27bae Mon Sep 17 00:00:00 2001 From: Julian FIOL Date: Mon, 9 Mar 2015 17:21:17 +0100 Subject: [PATCH] [Signed-off] Bug 13814 : add 6 unit tests in t/Boolean.t MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Works as expected. Signed-off-by: Marc VĂ©ron --- t/Boolean.t | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/t/Boolean.t b/t/Boolean.t index 0f04913..af81f13 100755 --- a/t/Boolean.t +++ b/t/Boolean.t @@ -2,19 +2,25 @@ use strict; use warnings; -use Test::More tests => 13; +use Test::More tests => 19; BEGIN { use_ok( 'C4::Boolean', qw( true_p ) ); } is( true_p('0'), '0', 'recognizes \'0\' as false' ); +is( true_p('nil'), '0', 'recognizes \'nil\' as false' ); is( true_p('false'), '0', 'recognizes \'false\' as false' ); is( true_p('off'), '0', 'recognizes \'off\' as false' ); is( true_p('no'), '0', 'recognizes \'no\' as false' ); +is( true_p('n'), '0', 'recognizes \'n\' as false' ); +is( true_p('NO'), '0', 'verified case insensitivity' ); is( true_p('1'), '1', 'recognizes \'1\' as true' ); +is( true_p('-1'), '1', 'recognizes \'-1\' as true' ); +is( true_p('t'), '1', 'recognizes \'t\' as true' ); is( true_p('true'), '1', 'recognizes \'true\' as true' ); is( true_p('on'), '1', 'recognizes \'on\' as true' ); is( true_p('yes'), '1', 'recognizes \'yes\' as true' ); +is( true_p('y'), '1', 'recognizes \'y\' as true' ); is( true_p('YES'), '1', 'verified case insensitivity' ); is( true_p(undef), undef, 'recognizes undefined as not boolean' ); -- 1.7.10.4