summaryrefslogtreecommitdiff
path: root/typemap
diff options
context:
space:
mode:
Diffstat (limited to 'typemap')
-rw-r--r--typemap6
1 files changed, 3 insertions, 3 deletions
diff --git a/typemap b/typemap
index 5011c4f..7dd54dc 100644
--- a/typemap
+++ b/typemap
@@ -9,14 +9,14 @@ QRecLevel T_ENUM
INPUT
T_QRCODE
- if (SvROK($arg) && sv_derived_from($arg, \"Data::QRCode\")) {
+ if (SvROK($arg) && sv_derived_from($arg, \"Data::QRCode::Result\")) {
IV tmp = SvIV((SV*)SvRV($arg));
$var = INT2PTR($type,tmp);
}
else
Perl_croak_nocontext(\"%s: %s is not of type %s\",
${$ALIAS?\q[GvNAME(CvGV(cv))]:\qq[\"$pname\"]},
- \"$var\", \"Data::QRCode\")
+ \"$var\", \"Data::QRCode::Result\")
T_QRINPUT
if (SvROK($arg) && sv_derived_from($arg, \"Data::QRCode::Input\")) {
@@ -31,6 +31,6 @@ T_QRINPUT
OUTPUT
T_QRCODE
- sv_setref_pv($arg, \"Data::QRCode\", (void*)$var);
+ sv_setref_pv($arg, \"Data::QRCode::Result\", (void*)$var);
T_QRINPUT
sv_setref_pv($arg, \"Data::QRCode::Input\", (void*)$var);