Make Unicode script fit for future versions

Between Unicode 15.0.0 and 15.1.0, the whitespace in
EastAsianWidth.txt has changed a bit, such as from

0020;Na          # Zs         SPACE

to

0020           ; Na # Zs         SPACE

with space around the semicolon.  Adjust the script to be able to
parse that.
This commit is contained in:
Peter Eisentraut 2023-09-18 07:25:46 +02:00
parent e0e492e5a9
commit 5c08927d36
1 changed files with 1 additions and 1 deletions

View File

@ -23,7 +23,7 @@ foreach my $line (<ARGV>)
chomp $line;
$line =~ s/\s*#.*$//;
next if $line eq '';
my ($codepoint, $width) = split ';', $line;
my ($codepoint, $width) = split /\s*;\s*/, $line;
if ($codepoint =~ /\.\./)
{