From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 28 Apr 2001 22:55:04 +0000 (+0000)
Subject: Forgot the latest mktables.PL from #9899.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f178ed66457a9ad627c33e14936605600f4c5690;p=p5sagit%2Fp5-mst-13.2.git

Forgot the latest mktables.PL from #9899.

p4raw-id: //depot/perl@9900
---

diff --git a/lib/unicode/mktables.PL b/lib/unicode/mktables.PL
index 70ed122..637050a 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";