]> git.vpit.fr Git - perl/modules/Variable-Magic.git/blobdiff - Magic.xs
hv_exists() is enough for vmg_wizard_sig()
[perl/modules/Variable-Magic.git] / Magic.xs
index 1fa63548e2a8bf86143010a61241fa57f3b57dfe..590d6afe3cf593e37f37c8c5825c3e35db59d603 100644 (file)
--- a/Magic.xs
+++ b/Magic.xs
@@ -1095,7 +1095,7 @@ STATIC U16 vmg_wizard_sig(pTHX_ SV *wiz) {
 
  {
   dMY_CXT;
-  if (!hv_fetch(MY_CXT.wizards, buf, sprintf(buf, "%u", sig), 0))
+  if (!hv_exists(MY_CXT.wizards, buf, sprintf(buf, "%u", sig)))
    croak(vmg_invalid_wiz);
  }