From: Karl Williamson <public@khwilliamson.com>
Date: Thu, 20 Jan 2011 15:38:58 +0000 (-0700)
Subject: mktables: Clarify comment
X-Git-Tag: v5.13.10~541
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/2cd56239d9852dbb010207ba4d0f0d95dbdfd74b

mktables: Clarify comment
---

diff --git a/lib/unicore/mktables b/lib/unicore/mktables
index 5b1b949..65998d5 100644
--- a/lib/unicore/mktables
+++ b/lib/unicore/mktables
@@ -8290,9 +8290,9 @@ sub finish_property_setup {
     my $fold = property_ref('Case_Folding');
     $fold->set_file('Fold') if defined $fold;
 
-    # utf8.c can't currently cope with non range-size-1 for these, and even if
-    # it were changed to do so, someone else may be using them, expecting the
-    # old style
+    # utf8.c has a different meaning for non range-size-1 for map properties
+    # that this program doesn't currently handle; and even if it were changed
+    # to do so, some other code may be using them expecting range size 1.
     foreach my $property (qw {
                                 Case_Folding
                                 Lowercase_Mapping