diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2012-01-05 20:48:49 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-01-05 20:48:54 -0800 |
| commit | c7102404ab5c18fd683fb5264665505b169ba928 (patch) | |
| tree | 482c9e8a97e186af743124f3ff6e935cfea06caf /universal.c | |
| parent | 480e0d3cb5dd65d869513ab5419347ef0d1c9763 (diff) | |
| download | perl-c7102404ab5c18fd683fb5264665505b169ba928.tar.gz | |
perlop: remove triple-dot
This has been superseded by c2f1e229, which adds it
to perlsyn.
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/universal.c b/universal.c index dd8ae74372..f6da76d859 100644 --- a/universal.c +++ b/universal.c @@ -813,6 +813,7 @@ XS(XS_utf8_decode) 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); } |