diff options
Diffstat (limited to 't/uni/upper.t')
-rw-r--r-- | t/uni/upper.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/t/uni/upper.t b/t/uni/upper.t index d9f1788c72..4229cfeb76 100644 --- a/t/uni/upper.t +++ b/t/uni/upper.t @@ -4,5 +4,7 @@ BEGIN { require "case.pl"; } -casetest("Upper", \%utf8::ToSpecUpper, sub { uc $_[0] }, +casetest( 0, # extra tests already run + "Upper", \%utf8::ToSpecUpper, + sub { uc $_[0] }, sub { my $a = ""; uc ($_[0] . $a) }); |