From: Vincent Pit <vince@profvince.com>
Date: Sat, 16 May 2009 07:42:16 +0000 (+0200)
Subject: Silence some redefine warnings for SVU_PP and SVU_SIZE
X-Git-Tag: v0.06~18
X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScalar-Vec-Util.git;a=commitdiff_plain;h=5d190c195e99dcfbbe49786e190b0922e24432b0

Silence some redefine warnings for SVU_PP and SVU_SIZE
---

diff --git a/lib/Scalar/Vec/Util.pm b/lib/Scalar/Vec/Util.pm
index 4e418cd..2c0f723 100644
--- a/lib/Scalar/Vec/Util.pm
+++ b/lib/Scalar/Vec/Util.pm
@@ -23,11 +23,11 @@ BEGIN {
   XSLoader::load(__PACKAGE__, $VERSION);
   1;
  } or do {
-  sub SVU_PP   () { 1 }
-  sub SVU_SIZE () { 1 }
-  *vfill = *vfill_pp;
-  *vcopy = *vcopy_pp;
-  *veq   = *veq_pp;
+  *SVU_PP   = sub () { 1 };
+  *SVU_SIZE = sub () { 1 };
+  *vfill    = *vfill_pp;
+  *vcopy    = *vcopy_pp;
+  *veq      = *veq_pp;
  }
 }