]> git.vpit.fr Git - perl/modules/Scope-Upper.git/commitdiff
Remove an extra ;
authorVincent Pit <vince@profvince.com>
Fri, 21 Sep 2012 14:08:15 +0000 (16:08 +0200)
committerVincent Pit <vince@profvince.com>
Fri, 21 Sep 2012 14:08:15 +0000 (16:08 +0200)
Upper.xs

index a5111f242029fd0ec84c13d87a8323e882712753..7d75d5fd944c37ba94b6c7ed3b15e2b34f85cb58 100644 (file)
--- a/Upper.xs
+++ b/Upper.xs
@@ -2572,7 +2572,7 @@ PPCODE:
  cx   = cxstack + cxix;
  dbcx = cx;
  if (PL_DBsub && cxix && (CxTYPE(cx) == CXt_SUB || CxTYPE(cx) == CXt_FORMAT)) {
-  I32 i = su_context_skip_db(cxix - 1) + 1;;
+  I32 i = su_context_skip_db(cxix - 1) + 1;
   if (i < cxix && CxTYPE(cxstack + i) == CXt_SUB)
    cx = cxstack + i;
  }