diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-01-22 22:56:50 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-01-23 10:19:36 -0800 |
| commit | 18984c14b373cb9ef631091f5c5e151e9b0971f0 (patch) | |
| tree | c229a6544541b2f791ca61bc10060f0ec0970fa4 /universal.c | |
| parent | 6dd7c1f1e9477c302194505f6e1aaa57121f68bd (diff) | |
| download | perl-18984c14b373cb9ef631091f5c5e151e9b0971f0.tar.gz | |
universal.c:XS_utf8_decode: rmv redundant code
SvPV_force_nolen already calls sv_force_normal for us.
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/universal.c b/universal.c index f6da76d859..463651bb73 100644 --- a/universal.c +++ b/universal.c @@ -812,7 +812,6 @@ XS(XS_utf8_decode) else { SV * const sv = ST(0); bool RETVAL; - if (SvREADONLY(sv)) sv_force_normal(sv); SvPV_force_nolen(sv); RETVAL = sv_utf8_decode(sv); ST(0) = boolSV(RETVAL); |