From d2ece331daee8e28f4c669904c9cfa6dee30dd74 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 9 Jan 2008 11:40:12 +0000
Subject: Change 32899 missed the other double-reference count.

p4raw-id: //depot/perl@32913
---
 regexec.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'regexec.c')

diff --git a/regexec.c b/regexec.c
index 9588cdfd12..9a41f202ca 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2259,7 +2259,7 @@ S_regtry(pTHX_ regmatch_info *reginfo, char **startpos)
                 /* so we know which PL_regex_padav element is PL_reg_curpm
 		   when clearing up in perl_destruct() */
                 SvFLAGS(repointer) |= SVf_BREAK;
-                av_push(PL_regex_padav,SvREFCNT_inc_simple_NN(repointer));
+                av_push(PL_regex_padav, repointer);
                 PL_reg_curpm->op_pmoffset = av_len(PL_regex_padav);
                 PL_regex_pad = AvARRAY(PL_regex_padav);
             }
-- 
cgit v1.2.1