From: Karl Williamson <public@khwilliamson.com>
Date: Thu, 15 Aug 2013 04:00:16 +0000 (-0600)
Subject: perluniprops: Add missing character to what's matched
X-Git-Tag: upstream/5.20.0~2316
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=814465b7a052811f451e6331358d951096cf249f;p=platform%2Fupstream%2Fperl.git

perluniprops: Add missing character to what's matched

mktables omitted the equal sign from the generated pod for certain
properties that should match it.
---

diff --git a/lib/unicore/mktables b/lib/unicore/mktables
index 5bb67e9..807fb31 100644
--- a/lib/unicore/mktables
+++ b/lib/unicore/mktables
@@ -13254,7 +13254,7 @@ sub compile_perl() {
     $Graph->add_alias('XPosixGraph');
     $perl->add_match_table("PosixGraph",
                             Description =>
-                                '[-!"#$%&\'()*+,./:;<>?@[\\\]^_`{|}~0-9A-Za-z]',
+                                '[-!"#$%&\'()*+,./:;<=>?@[\\\]^_`{|}~0-9A-Za-z]',
                             Initialize => $Graph & $ASCII,
                             );
 
@@ -13265,7 +13265,7 @@ sub compile_perl() {
     $print->add_alias('XPosixPrint');
     $perl->add_match_table("PosixPrint",
                             Description =>
-                              '[- 0-9A-Za-z!"#$%&\'()*+,./:;<>?@[\\\]^_`{|}~]',
+                              '[- 0-9A-Za-z!"#$%&\'()*+,./:;<=>?@[\\\]^_`{|}~]',
                             Initialize => $print & $ASCII,
                             );
 
@@ -13280,7 +13280,7 @@ sub compile_perl() {
                                 Perl_Extension => 1
         );
     $perl->add_match_table('PosixPunct', Perl_Extension => 1,
-        Description => '[-!"#$%&\'()*+,./:;<>?@[\\\]^_`{|}~]',
+        Description => '[-!"#$%&\'()*+,./:;<=>?@[\\\]^_`{|}~]',
         Initialize => $ASCII & $XPosixPunct,
         );