projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
967ac23
)
move brace to same line as conditional
author
Karl Williamson
<public@khwilliamson.com>
Mon, 21 Feb 2011 16:57:29 +0000
(09:57 -0700)
committer
Karl Williamson
<public@khwilliamson.com>
Mon, 21 Feb 2011 17:21:04 +0000
(10:21 -0700)
toke.c
patch
|
blob
|
history
diff --git
a/toke.c
b/toke.c
index
7dbdd08
..
f7f0849
100644
(file)
--- a/
toke.c
+++ b/
toke.c
@@
-8797,8
+8797,7
@@
S_pmflag(pTHX_ const char* const valid_flags, U32 * pmfl, char** s) {
if (*((*s) + 1) == 't') {
goto deprecate;
}
- else if (*((*s) + 1) == 'e' && ! isALNUM(*((*s) + 2)))
- {
+ else if (*((*s) + 1) == 'e' && ! isALNUM(*((*s) + 2))) {
Perl_ck_warner_d(aTHX_ packWARN(WARN_AMBIGUOUS),
"Ambiguous use of 's//le...' resolved as 's// le...'; Rewrite as 's//el' if you meant 'use locale rules and evaluate rhs as an expression'. In Perl 5.16, it will be resolved the other way");
return FALSE;