From e9ee8a34811977f09403961876df7619afb47e65 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?G=C3=A1bor=20Szab=C3=B3?= Date: Wed, 15 Apr 2009 15:00:15 +0000 Subject: [PATCH] add more test cases --- t/33_non_latin_path.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/t/33_non_latin_path.t b/t/33_non_latin_path.t index 1e4d8fe..8f43ea5 100644 --- a/t/33_non_latin_path.t +++ b/t/33_non_latin_path.t @@ -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)),