diff options
Diffstat (limited to 'src/backend/utils/mb/Unicode/convutils.pm')
-rw-r--r-- | src/backend/utils/mb/Unicode/convutils.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/backend/utils/mb/Unicode/convutils.pm b/src/backend/utils/mb/Unicode/convutils.pm index 0ae79a2f331..eb3c602c32d 100644 --- a/src/backend/utils/mb/Unicode/convutils.pm +++ b/src/backend/utils/mb/Unicode/convutils.pm @@ -57,8 +57,11 @@ sub read_source next if (/^0x([0-9A-F]+)\s+(#.*)$/); - # Skip the first column for JIS0208.TXT - if (!/^0x([0-9A-Fa-f]+)\s+0x([0-9A-Fa-f]+)\s+(?:0x([0-9A-Fa-f]+)\s+)?(#.*)$/) + # The Unicode source files have three columns + # 1: The "foreign" code (in hex) + # 2: Unicode code point (in hex) + # 3: Unicode name + if (!/^0x([0-9A-Fa-f]+)\s+0x([0-9A-Fa-f]+)\s+(#.*)$/) { print STDERR "READ ERROR at line $. in $fname: $_\n"; exit; |