summaryrefslogtreecommitdiff
path: root/lib/unicore
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2003-04-16 10:07:48 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2003-04-16 10:07:48 +0000
commit1d38ddd50d911c3db1b6828273eed311cb90471e (patch)
treec45c2965dbefaed2233e1922785dd629fbbf1afb /lib/unicore
parent14fc01c41090ee224fd726e5a5418c61e16bd662 (diff)
downloadperl-1d38ddd50d911c3db1b6828273eed311cb90471e.tar.gz
Syntax terror.
p4raw-id: //depot/perl@19233
Diffstat (limited to 'lib/unicore')
-rw-r--r--lib/unicore/mktables2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables
index a462ff9c11..4c56b0ff7b 100644
--- a/lib/unicore/mktables
+++ b/lib/unicore/mktables
@@ -651,7 +651,7 @@ sub UnicodeData_Txt()
|| $code == 0x2029;# 2029: PARAGRAPH SEP.
$Cat{Blank}->$op($code) if $cat eq "Zs"
- || $code == 0x0009 # 0009: HORIZONTAL TAB;
+ || $code == 0x0009; # 0009: HORIZONTAL TAB
$Cat{Digit}->$op($code) if $cat eq "Nd";
$Cat{Upper}->$op($code) if $cat eq "Lu";