Use gv_stashpv instead of gv_stashpvs

gv_stashpvs isn't available on various perls, apparently.
rafl · May 15, 2010 · a238b13 · a238b13
1 parent b7860fd
commit a238b13
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/UUID.xs b/UUID.xs
@@ -586,7 +586,7 @@ BOOT:
   instances = ptable_new();
   MUTEX_INIT(&instances_mutex);
 #endif
-  HV *stash = gv_stashpvs("Data::UUID", 0);
+  HV *stash = gv_stashpv("Data::UUID", 0);
   STRLEN len = sizeof(perl_uuid_t);
   newCONSTSUB(stash, "NameSpace_DNS", newSVpv((char *)&NameSpace_DNS, len));
   newCONSTSUB(stash, "NameSpace_URL", newSVpv((char *)&NameSpace_URL, len));