X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=op.c;h=94fbc159ba20ca01cd6096f4e95983c87e1ccff1;hb=245ccdfc96e80a37f854d10e16cf1eb342c49934;hp=035247ba070cbdd09fe99135ded3e278b781cab4;hpb=51a19bc0654ae83130b5db1dfb665bcc81c7afd1;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/op.c b/op.c
index 035247b..94fbc15 100644
--- a/op.c
+++ b/op.c
@@ -4763,10 +4763,8 @@ ck_glob(OP *o)
 	gv = gv_fetchpv("CORE::GLOBAL::glob", FALSE, SVt_PVCV);
 
     if (gv && GvIMPORTED_CV(gv)) {
-	static int glob_index;
-
 	append_elem(OP_GLOB, o,
-		    newSVOP(OP_CONST, 0, newSViv(glob_index++)));
+		    newSVOP(OP_CONST, 0, newSViv(PL_glob_index++)));
 	o->op_type = OP_LIST;
 	o->op_ppaddr = PL_ppaddr[OP_LIST];
 	cLISTOPo->op_first->op_type = OP_PUSHMARK;