X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=typemap;h=7bd56b6718e5826286c03fbad200a58b7a39959b;hb=2ec2c7887feee78c8962df3484f169feeb9b2330;hp=3ceed40a596ebbf81c72fab91b6ae7829d30c64f;hpb=226778b2845b54eb8c8df08d56e2943a4ec5577f;p=ZOOM-Perl-moved-to-github.git

diff --git a/typemap b/typemap
index 3ceed40..7bd56b6 100644
--- a/typemap
+++ b/typemap
@@ -1,5 +1,3 @@
-# $Id: typemap,v 1.7 2006-11-03 09:37:57 mike Exp $
-
 ZOOM_connection					T_PTROBJ
 ZOOM_connection *				T_PTROBJ
 ZOOM_options					T_PTROBJ
@@ -67,7 +65,7 @@ T_OPAQUE_STRUCT
 	else
 	    croak(\"$var is not of type ${ntype}\")
 T_OPAQUECHAR
-	{ unsigned _unused_len;
+	{ STRLEN _unused_len;
 	$var = ($type) SvPV($arg, _unused_len); }
 
 # ---------------------------------------------------------------------------