--- t/20-sql.t 2008/06/15 17:47:39 162 +++ t/20-sql.t 2008/09/01 18:44:33 233 @@ -8,7 +8,7 @@ =cut -use Jifty::Test tests => 24; +use Jifty::Test tests => 26; use Data::Dump qw/dump/; @@ -24,6 +24,9 @@ cmp_ok( $sql->count, '==', 1, 'count' ); +ok( my $duration = $sql->duration, 'duration' ); +diag "duration: $duration"; + ok( my $row = $sql->next, 'next' ); isa_ok( $row, 'A3C::SQL::row' ); @@ -48,4 +51,5 @@ cmp_ok( $sql->count, '==', 1, 'count' ); ok( my $row3 = $sql->next, 'next' ); is_deeply( $row3->test, "\x{10D}evap\x{107}i\x{107}", 'correct encoding' ); +ok( $row3->TesT, 'ignore case of accessor' );