diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-28 22:55:04 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-04-28 22:55:04 +0000 |
| commit | f178ed66457a9ad627c33e14936605600f4c5690 (patch) | |
| tree | db6dedcda879254b17092ff3619f2c991d5255bc | |
| parent | 56ca2fc0091196610c2d918908f5e362829dd24d (diff) | |
| download | perl-f178ed66457a9ad627c33e14936605600f4c5690.tar.gz | |
Forgot the latest mktables.PL from #9899.
p4raw-id: //depot/perl@9900
| -rwxr-xr-x | lib/unicode/mktables.PL | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/unicode/mktables.PL b/lib/unicode/mktables.PL index 70ed1225ba..637050a3fc 100755 --- a/lib/unicode/mktables.PL +++ b/lib/unicode/mktables.PL @@ -325,7 +325,7 @@ EOH # Order doesn't matter but let's prettyprint anyway. foreach my $in (sort { $InId{$a} <=> $InId{$b} } keys %InId) { - printf INID "%-40s => %2d,\n", "'$in'", $InId{$in}; + printf INID "%-40s => %3d,\n", "'$in'", $InId{$in}; } print INID ");\n"; |