summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorRobin Barker <RMBarker@cpan.org>2007-09-26 14:25:49 +0100
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-09-26 12:46:53 +0000
commitd804f4346b490171e547d5cc512063e53da10708 (patch)
tree330693c9d7ffc7f265d848cb89e5beda072ec749 /sv.c
parent3d76853f2ba25cc9699cf098371070e4651e154f (diff)
downloadperl-d804f4346b490171e547d5cc512063e53da10708.tar.gz
RE: [PATCH] use 5.010 is ugly; use 5.10.0 warns
From: "Robin Barker" <Robin.Barker@npl.co.uk> Message-ID: <2C2E01334A940D4792B3E115F95B7226C9D1C3@exchsvr1.npl.ad.local> p4raw-id: //depot/perl@31978
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/sv.c b/sv.c
index f94e1bac7d..a07a57f8ae 100644
--- a/sv.c
+++ b/sv.c
@@ -11534,6 +11534,8 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags,
PTR2UV(PL_watchok));
}
+ PL_v_string_ok = proto_perl->Iv_string_ok;
+
if (!(flags & CLONEf_KEEP_PTR_TABLE)) {
ptr_table_free(PL_ptr_table);
PL_ptr_table = NULL;