diff options
| author | Gisle Aas <gisle@aas.no> | 2005-11-30 01:28:54 -0800 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-11-30 17:57:16 +0000 |
| commit | 2219f6da8b4df34299c1085ceb0611febcdea865 (patch) | |
| tree | 143d72d6312dfc3af56e3bf7bf01b936eae1353c /sv.c | |
| parent | 979f29225180f8c09f4adec52f850ae45694fd81 (diff) | |
| download | perl-2219f6da8b4df34299c1085ceb0611febcdea865.tar.gz | |
Remove redundant SvUTF8_on() calls
Message-ID: <lrhd9uhwo9.fsf@caliper.activestate.com>
p4raw-id: //depot/perl@26231
Diffstat (limited to 'sv.c')
| -rw-r--r-- | sv.c | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -7978,8 +7978,6 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const char *pat, STRLEN patlen, va_list *args, SV } else if (svix < svmax) { sv_catsv(sv, *svargs); - if (DO_UTF8(*svargs)) - SvUTF8_on(sv); } return; } @@ -7987,8 +7985,6 @@ Perl_sv_vcatpvfn(pTHX_ SV *sv, const char *pat, STRLEN patlen, va_list *args, SV pat[1] == '-' && pat[2] == 'p') { argsv = va_arg(*args, SV*); sv_catsv(sv, argsv); - if (DO_UTF8(argsv)) - SvUTF8_on(sv); return; } |