8 eval "use DBD::SQLite";
9 plan skip_all
=> "DBD::SQLite is required to run this test" if $@
;
18 my $db = NewDB
->new();
29 $u->i18n->signature( 'wow' );
31 is
( $u->i18n( 'ru' )->signature, 'wow' );
33 is
( $u->i18n( 'en' )->istran, 0 );
35 is
( $u->i18n->signature, 'wow' );
37 $u->delete( cascade
=> 1 );