This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove some whitespace pod warnings in perluniprops.pod
authorMichael Stevens <mstevens@etla.org>
Sun, 13 Feb 2011 13:23:30 +0000 (13:23 +0000)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 13 Feb 2011 19:30:36 +0000 (11:30 -0800)
lib/unicore/mktables

index ab90ba3..0d58b4d 100644 (file)
@@ -12906,9 +12906,11 @@ END
     # Generate a list of the formats that can appear in the map tables.
     my @map_table_formats;
     foreach my $format (sort keys %map_table_formats) {
     # Generate a list of the formats that can appear in the map tables.
     my @map_table_formats;
     foreach my $format (sort keys %map_table_formats) {
-        push @map_table_formats, " $format    $map_table_formats{$format}\n";
+        push @map_table_formats, "  $format    $map_table_formats{$format}\n";
     }
 
     }
 
+    local $" = "";
+
     # Everything is ready to assemble.
     my @OUT = << "END";
 =begin comment
     # Everything is ready to assemble.
     my @OUT = << "END";
 =begin comment
@@ -13203,7 +13205,7 @@ this is not necessarily the property's official Unicode name.  (The 'To' is
 also for backwards compatibility.)  The hash entry gives the format of the
 mapping fields of the table, currently one of the following:
 
 also for backwards compatibility.)  The hash entry gives the format of the
 mapping fields of the table, currently one of the following:
 
- @map_table_formats
+@map_table_formats
 
 This format applies only to the entries in the main body of the table.
 Entries defined in hashes or ones that are missing from the list can have a
 
 This format applies only to the entries in the main body of the table.
 Entries defined in hashes or ones that are missing from the list can have a