From: Vincent Pit <perl@profvince.com>
Date: Wed, 4 Nov 2015 17:12:00 +0000 (-0200)
Subject: Reuse the package name macro wherever possible
X-Git-Tag: v0.11~10
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=5aedd658d1e70fe63277bc50f162a16be1574d55;p=perl%2Fmodules%2Fre-engine-Plugin.git

Reuse the package name macro wherever possible
---

diff --git a/Plugin.xs b/Plugin.xs
index 7655326..9004ade 100644
--- a/Plugin.xs
+++ b/Plugin.xs
@@ -215,7 +215,7 @@ Plugin_comp(pTHX_ const SV * const pattern, const U32 flags)
  obj = newSV(0);
  SvREFCNT_inc_simple_void_NN(obj);
  Newxz(re, 1, struct replug);
- sv_setref_pv(obj, "re::engine::Plugin", (void *) re);
+ sv_setref_pv(obj, XSH_PACKAGE, (void *) re);
 
  newREGEXP(RX);
  rx = rxREGEXP(RX);
@@ -546,7 +546,7 @@ Plugin_package(pTHX_ REGEXP * const RX)
 {
  PERL_UNUSED_ARG(RX);
 
- return newSVpvs("re::engine::Plugin");
+ return newSVpvs(XSH_PACKAGE);
 }
 
 static void xsh_user_global_setup(pTHX) {