]> git.vpit.fr Git - perl/modules/re-engine-Plugin.git/commitdiff
Reuse the package name macro wherever possible
authorVincent Pit <perl@profvince.com>
Wed, 4 Nov 2015 17:12:00 +0000 (15:12 -0200)
committerVincent Pit <perl@profvince.com>
Wed, 4 Nov 2015 23:57:56 +0000 (21:57 -0200)
Plugin.xs

index 7655326eb4eb6ad6dbfbd73c7ce9663f4447dc53..9004adeed655e6ce3def1c5a7950f641945ce861 100644 (file)
--- 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) {