stop DEBUG_LEAKING_SCALARS producing spurious memory pool errors

(change #25775 wasn't complete)
p4raw-link: @25775 on //depot/perl: 22162ca81623f0ce6683af5e97b91bf10ad89079

p4raw-id: //depot/perl@26587

diff --git a/sv.c b/sv.c
index 016cad5..9cc9c37 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -9333,11 +9333,7 @@ Perl_sv_dup(pTHX_ const SV *sstr, CLONE_PARAMS* param)
     dstr->sv_debug_line = sstr->sv_debug_line;
     dstr->sv_debug_inpad = sstr->sv_debug_inpad;
     dstr->sv_debug_cloned = 1;
-#  ifdef NETWARE
     dstr->sv_debug_file = savepv(sstr->sv_debug_file);
-#  else
-    dstr->sv_debug_file = savesharedpv(sstr->sv_debug_file);
-#  endif
 #endif
 
     ptr_table_store(PL_ptr_table, sstr, dstr);