diff options
| author | Karl Williamson <khw@cpan.org> | 2015-02-04 12:34:04 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2015-02-05 13:54:23 -0700 |
| commit | b10bad5ab5534c23d5f3e698f053bfe49cfd2d15 (patch) | |
| tree | 396b32a1596b09673a683dd2c55c04c7ee3415f9 | |
| parent | 84875a28d7b7f4db402f82dd5f607497b00db5e6 (diff) | |
| download | perl-b10bad5ab5534c23d5f3e698f053bfe49cfd2d15.tar.gz | |
re.pm: White-space only
Fix some indents, vertically align ternary
| -rw-r--r-- | ext/re/re.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ext/re/re.pm b/ext/re/re.pm index fa1c6e68b1..9a172ad436 100644 --- a/ext/re/re.pm +++ b/ext/re/re.pm @@ -221,8 +221,8 @@ sub bits { } else { delete $^H{reflags_charset} - if defined $^H{reflags_charset} - && $^H{reflags_charset} == $reflags{$_}; + if defined $^H{reflags_charset} + && $^H{reflags_charset} == $reflags{$_}; } } elsif (exists $reflags{$_}) { $seen{$_}++; @@ -238,8 +238,8 @@ sub bits { } } ($^H{reflags} = $reflags or defined $^H{reflags_charset}) - ? $^H |= $flags_hint - : ($^H &= ~$flags_hint); + ? $^H |= $flags_hint + : ($^H &= ~$flags_hint); } else { require Carp; Carp::carp("Unknown \"re\" subpragma '$s' (known ones are: ", |