projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
b4eac3b
)
Subject: unicode_strings.t: rmv trail blanks
author
Karl Williamson
<public@khwilliamson.com>
Thu, 23 Sep 2010 13:55:15 +0000
(07:55 -0600)
committer
Jesse Vincent
<jesse@bestpractical.com>
Fri, 15 Oct 2010 14:14:29 +0000
(23:14 +0900)
lib/feature/unicode_strings.t
patch
|
blob
|
history
diff --git
a/lib/feature/unicode_strings.t
b/lib/feature/unicode_strings.t
index
dce34bd
..
3dfb0cf
100644
(file)
--- a/
lib/feature/unicode_strings.t
+++ b/
lib/feature/unicode_strings.t
@@
-26,7
+26,7
@@
my @posix_to_lower
= my @latin1_to_title
= @posix_to_upper;
-# Override the elements in the to_lower arrays that have different lower case
+# Override the elements in the to_lower arrays that have different lower case
# mappings
for my $i (0x41 .. 0x5A) {
$posix_to_lower[$i] = chr(ord($posix_to_lower[$i]) + 32);
@@
-84,7
+84,7
@@
for my $prefix (\%empty, \%posix, \%cyrillic, \%latin1) {
my $cp = sprintf "U+%04X", $i;
# First try using latin1 (Unicode) semantics.
- use feature "unicode_strings";
+ use feature "unicode_strings";
my $phrase = 'with uni8bit';
my $char = chr($i);