diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-01-04 16:59:45 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-01-04 17:04:43 -0700 |
commit | a35d7f90a298ee9ffbe7f3151ea861cbe33eccc6 (patch) | |
tree | 01bf45130133b8771ac64385534e8c822155d6cf | |
parent | 1cba1759218c54622a21a05c66db2d7513da4f69 (diff) | |
download | perl-a35d7f90a298ee9ffbe7f3151ea861cbe33eccc6.tar.gz |
mktables: white space-only change
A previous commit removed the 'if' around this code, so can outdent it.
-rw-r--r-- | lib/unicore/mktables | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables index 081314d042..d97b12b378 100644 --- a/lib/unicore/mktables +++ b/lib/unicore/mktables @@ -9346,19 +9346,19 @@ END # If the map begins with a special command to us (enclosed in # delimiters), extract the command(s). - while ($map =~ s/ ^ $CMD_DELIM (.*?) $CMD_DELIM //x) { - my $command = $1; - if ($command =~ / ^ $REPLACE_CMD= (.*) /x) { - $replace = $1; - } - elsif ($command =~ / ^ $MAP_TYPE_CMD= (.*) /x) { - $map_type = $1; - } - else { - $file->carp_bad_line("Unknown command line: '$1'"); - next LINE; - } + while ($map =~ s/ ^ $CMD_DELIM (.*?) $CMD_DELIM //x) { + my $command = $1; + if ($command =~ / ^ $REPLACE_CMD= (.*) /x) { + $replace = $1; } + elsif ($command =~ / ^ $MAP_TYPE_CMD= (.*) /x) { + $map_type = $1; + } + else { + $file->carp_bad_line("Unknown command line: '$1'"); + next LINE; + } + } } if ($default_map eq $CODE_POINT && $map =~ / ^ $code_point_re $/x) |