diff options
| author | Karl Williamson <public@khwilliamson.com> | 2010-09-12 22:19:54 -0600 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2010-09-25 00:47:03 -0700 |
| commit | 81965e2b9c462d35b04a8c01631dbb664e3b9431 (patch) | |
| tree | d5498135bf5e1965f076de082123d8b2bedb96b3 /lib/charnames.pm | |
| parent | bcc08981dcac9739492da9cf6f4de3830c6a6a66 (diff) | |
| download | perl-81965e2b9c462d35b04a8c01631dbb664e3b9431.tar.gz | |
charnames.pm: reformat comments
Now that have less indent, don't need so many lines. The only changes
in this commit are several blocks of comments to occupy more of each
line. No wording changes are involved.
Diffstat (limited to 'lib/charnames.pm')
| -rw-r--r-- | lib/charnames.pm | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/lib/charnames.pm b/lib/charnames.pm index 2ff0c1da4f..677edfc6a5 100644 --- a/lib/charnames.pm +++ b/lib/charnames.pm @@ -90,11 +90,10 @@ my %system_aliases = ( 'PM ' => pack("U", 0x9E), # PRIVACY MESSAGE 'APC' => pack("U", 0x9F), # APPLICATION PROGRAM COMMAND - # There are no names for these in the Unicode standard; - # perhaps should be deprecated, but then again there are - # no alternative names, so am not deprecating. And if - # did, the code would have to change to not recommend an - # alternative for these. + # There are no names for these in the Unicode standard; perhaps should be + # deprecated, but then again there are no alternative names, so am not + # deprecating. And if did, the code would have to change to not recommend + # an alternative for these. 'PADDING CHARACTER' => pack("U", 0x80), 'PAD' => pack("U", 0x80), 'HIGH OCTET PRESET' => pack("U", 0x81), @@ -104,9 +103,8 @@ my %system_aliases = ( 'SINGLE GRAPHIC CHARACTER INTRODUCER' => pack("U", 0x99), 'SGC' => pack("U", 0x99), - # More convenience. For further convenience, - # it is suggested some way of using the NamesList - # aliases be implemented, but there are ambiguities in + # More convenience. For further convenience, it is suggested some way of + # using the NamesList aliases be implemented, but there are ambiguities in # NamesList.txt 'BOM' => pack("U", 0xFEFF), # BYTE ORDER MARK 'BYTE ORDER MARK'=> pack("U", 0xFEFF), |