From: Vincent Pit <vince@profvince.com>
Date: Sun, 21 Sep 2008 22:35:10 +0000 (+0200)
Subject: Remove two unused variables
X-Git-Tag: v0.21_01~3
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=18249a13e0630dd85dfb70ec9190eb18280fb7c0;p=perl%2Fmodules%2FVariable-Magic.git

Remove two unused variables
---

diff --git a/Magic.xs b/Magic.xs
index 6c5b616..e25d8d1 100644
--- a/Magic.xs
+++ b/Magic.xs
@@ -874,7 +874,6 @@ CLONE(...)
 PROTOTYPE: DISABLE
 PREINIT:
  HV *hv;
- U16 count;
 CODE:
 #if VMG_THREADSAFE
  {
@@ -888,7 +887,6 @@ CODE:
    char *sig = HePV(key, len);
    SV *sv;
    MAGIC *mg;
-   MGWIZ *w;
    sv = MGWIZ2SV(vmg_wizard_clone(SV2MGWIZ(HeVAL(key))));
    mg = sv_magicext(sv, NULL, PERL_MAGIC_ext, &vmg_wizard_vtbl, NULL, 0);
    mg->mg_private = SIG_WIZ;