1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 14:19:10 -04:00

add more test cases

This commit is contained in:
Gábor Szabó 2009-04-15 15:00:15 +00:00
parent 1a5d2ed879
commit e9ee8a3481

View file

@ -13,7 +13,7 @@ use t::lib::Test;
use Test::More;
BEGIN {
if ( $] >= 5.008005 ) {
plan( tests => 13 );
plan( tests => 25 );
} else {
plan( skip_all => 'Unicode is not supported before 5.8.5' );
}
@ -29,7 +29,7 @@ eval "require utf8";
die $@ if $@;
my $dir = File::Temp::tempdir( CLEANUP => 1 );
foreach my $subdir ( 'longascii', 'adatbázis' ) {
foreach my $subdir ( 'longascii', 'adatbázis', 'name with spaces', '¿¿¿ ¿¿¿¿¿¿') {
utf8::upgrade($subdir);
ok(
mkdir(catdir($dir, $subdir)),