X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;ds=sidebyside;f=perl%2Ftypemap;h=c29c02d16dfd03f8494de19663bc6ad80250dce8;hb=24e778286a2d684cb08afb29f5c0e48b2b312e7e;hp=752ca0d79719d99e16b890342b28385f4899a580;hpb=aa5d6c138b55e25994ac723e94f32b009366927c;p=hivex.git

diff --git a/perl/typemap b/perl/typemap
index 752ca0d..c29c02d 100644
--- a/perl/typemap
+++ b/perl/typemap
@@ -1,11 +1,11 @@
 TYPEMAP
 char *		T_PV
 const char *	T_PV
-guestfs_h *	O_OBJECT_guestfs_h
-int64_t	  	T_IV
+hive_h *	O_OBJECT_hive_h
+int64_t		T_IV
 
 INPUT
-O_OBJECT_guestfs_h
+O_OBJECT_hive_h
     if (sv_isobject ($arg) && SvTYPE (SvRV ($arg)) == SVt_PVMG)
         $var = ($type) SvIV ((SV *) SvRV ($arg));
     else {
@@ -14,5 +14,5 @@ O_OBJECT_guestfs_h
     }
 
 OUTPUT
-O_OBJECT_guestfs_h
-    sv_setref_pv ($arg, "Sys::Guestfs", (void *) $var);
+O_OBJECT_hive_h
+    sv_setref_pv ($arg, "Win::Hivex", (void *) $var);