diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-16 09:45:51 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-04-16 09:45:51 +0000 |
| commit | 14fc01c41090ee224fd726e5a5418c61e16bd662 (patch) | |
| tree | 2c3147529a820a6b3140757bb3d2cf4f4419245a /lib/unicore/mktables | |
| parent | c65e4d19dcce98b8a7e895060b6fe141cfaef8a6 (diff) | |
| download | perl-14fc01c41090ee224fd726e5a5418c61e16bd662.tar.gz | |
Redundant test.
p4raw-id: //depot/perl@19232
Diffstat (limited to 'lib/unicore/mktables')
| -rw-r--r-- | lib/unicore/mktables | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables index fa07346b21..a462ff9c11 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -651,8 +651,7 @@ sub UnicodeData_Txt() || $code == 0x2029;# 2029: PARAGRAPH SEP. $Cat{Blank}->$op($code) if $cat eq "Zs" - || $code == 0x0009 # 0009: HORIZONTAL TAB - || $code == 0x0020; # 0020: SPACE + || $code == 0x0009 # 0009: HORIZONTAL TAB; $Cat{Digit}->$op($code) if $cat eq "Nd"; $Cat{Upper}->$op($code) if $cat eq "Lu"; |