This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regen/mk_invlists.pl: White-space only
authorKarl Williamson <khw@cpan.org>
Sat, 27 Jun 2015 20:32:15 +0000 (14:32 -0600)
committerKarl Williamson <khw@cpan.org>
Wed, 29 Jul 2015 04:15:55 +0000 (22:15 -0600)
Reindent after the previous commit introduced an outer block

charclass_invlists.h
regen/mk_invlists.pl

index d2349e3..c1b0c9b 100644 (file)
@@ -99524,5 +99524,5 @@ static const UV XPosixXDigit_invlist[] = { /* for EBCDIC POSIX-BC */
  * 668579029ac0720853bf19781ec10ec922495271543c91531d7a6db3fcdffba9 lib/unicore/mktables
  * 462c9aaa608fb2014cd9649af1c5c009485c60b9c8b15b89401fdc10cf6161c6 lib/unicore/version
  * c6884f4d629f04d1316f3476cb1050b6a1b98ca30c903262955d4eae337c6b1e regen/charset_translations.pl
- * 3ea229d7bcbcb5864f985bcdcb6007f51949870d54f1dc469f299778051a9c94 regen/mk_invlists.pl
+ * ab4edd10b64281af105cb74042c8f2ac8277e8b78ce24cd58c05e7259cfd9f50 regen/mk_invlists.pl
  * ex: set ro: */
index ac0470c..565280e 100644 (file)
@@ -503,12 +503,12 @@ for my $charset (get_supported_code_pages()) {
                                                           unless defined $count;
                 }
                 else {
-                @invlist = @$list_ref;
-                @invmap = @$map_ref;
-                $map_format = $format;
-                $map_default = $default;
-                $maps_to_code_point = $map_format =~ /x/;
-                $to_adjust = $map_format =~ /a/;
+                    @invlist = @$list_ref;
+                    @invmap = @$map_ref;
+                    $map_format = $format;
+                    $map_default = $default;
+                    $maps_to_code_point = $map_format =~ /x/;
+                    $to_adjust = $map_format =~ /a/;
                 }
             }
         }