Fix mktables bug due to the previous overload fix
authorRafael Garcia-Suarez <rgs@consttype.org>
Tue, 22 May 2012 15:23:20 +0000 (17:23 +0200)
committerRafael Garcia-Suarez <rgs@consttype.org>
Tue, 22 May 2012 15:23:20 +0000 (17:23 +0200)
Due to the previous patch, perl can't generate the operator for .= in
package Property anymore (because fallback is '0' in that package), so
we need to work around that; this patch implements the least intrusive
workaround possible.

lib/unicore/mktables

index b4d980b..3ad7a48 100644 (file)
@@ -12881,9 +12881,10 @@ END
                                 Type => $ENUM,
                                 Initialize => $age,
                                 );
+        my $q_in = "$in";
         $in->add_comment(join_lines(<<END
 THIS FILE SHOULD NOT BE USED FOR ANY PURPOSE.  The values in this file are the
-same as for $age, and not for what $in really means.  This is because anything
+same as for $age, and not for what $q_in really means.  This is because anything
 defined in a given release should have multiple values: that release and all
 higher ones.  But only one value per code point can be represented in a table
 like this.