In pp_caller, remove a GvMULTI_on() by adding GV_ADDMULTI to gv_fetchpvs().
Nicholas Clark [Sat, 8 Aug 2009 08:40:42 +0000 (09:40 +0100)]
pp_ctl.c

index a8b8b6d..453d6d7 100644 (file)
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -1749,9 +1749,8 @@ PP(pp_caller)
        const int off = AvARRAY(ary) - AvALLOC(ary);
 
        if (!PL_dbargs) {
-           GV* const tmpgv = gv_fetchpvs("DB::args", GV_ADD, SVt_PVAV);
-           PL_dbargs = GvAV(gv_AVadd(tmpgv));
-           GvMULTI_on(tmpgv);
+           PL_dbargs = GvAV(gv_AVadd(gv_fetchpvs("DB::args", GV_ADDMULTI,
+                                                 SVt_PVAV)));
            AvREAL_off(PL_dbargs);      /* XXX should be REIFY (see av.h) */
        }