summaryrefslogtreecommitdiff
path: root/pp.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-11-11 10:45:27 -0700
committerKarl Williamson <public@khwilliamson.com>2011-11-11 13:30:59 -0700
commit17e95c9d98739c7991e60a16f261b29b0fdb242d (patch)
tree3e21fc087ed2fc4f2c20f6d1773a67453c3072f6 /pp.c
parent623cd299abd625a89c29cda37cda133347df139e (diff)
downloadperl-17e95c9d98739c7991e60a16f261b29b0fdb242d.tar.gz
pp.c: White-space only
This outdents and reflows comments as a result of the removal of a surrounding block
Diffstat (limited to 'pp.c')
-rw-r--r--pp.c13
1 files changed, 6 insertions, 7 deletions
diff --git a/pp.c b/pp.c
index 9c01f63ac6..94f19109a6 100644
--- a/pp.c
+++ b/pp.c
@@ -3537,14 +3537,13 @@ PP(pp_ucfirst)
}
else if (DO_UTF8(source)) { /* Is the source utf8? */
doing_utf8 = TRUE;
+ ulen = UTF8SKIP(s);
+ if (op_type == OP_UCFIRST) toTITLE_utf8(s, tmpbuf, &tculen);
+ else toLOWER_utf8(s, tmpbuf, &tculen);
- ulen = UTF8SKIP(s);
- if (op_type == OP_UCFIRST) toTITLE_utf8(s, tmpbuf, &tculen);
- else toLOWER_utf8(s, tmpbuf, &tculen);
-
- /* we can't do in-place if the length changes. */
- if (ulen != tculen) inplace = FALSE;
- need = slen + 1 - ulen + tculen;
+ /* we can't do in-place if the length changes. */
+ if (ulen != tculen) inplace = FALSE;
+ need = slen + 1 - ulen + tculen;
}
else { /* Non-zero length, non-UTF-8, Need to consider locale and if
* latin1 is treated as caseless. Note that a locale takes