From 7f5edf5f99cb9f1287b610ee76f54788a6f60275 Mon Sep 17 00:00:00 2001
From: mike <mike>
Date: Tue, 11 Oct 2005 15:40:14 +0000
Subject: [PATCH 1/1] const char * is now a T_PV. As originally autogenerated
 by h2xs, this file gave the type of "const char *" as
 T_PTROBJ -- a pointer to an opaque object.  This
 prevented the return value of ZOOM_record_get() from
 being translated into a Perl string.  Instead, I am
 using T_PV, which works properly.

---
 typemap |    9 +++++++--
 1 file changed, 7 insertions(+), 2 deletions(-)

diff --git a/typemap b/typemap
index 237a6bf..4f00557 100644
--- a/typemap
+++ b/typemap
@@ -1,4 +1,4 @@
-# $Id: typemap,v 1.2 2005-10-11 11:36:33 mike Exp $
+# $Id: typemap,v 1.3 2005-10-11 15:40:14 mike Exp $
 
 ZOOM_connection					T_PTROBJ
 ZOOM_connection *				T_PTROBJ
@@ -20,7 +20,12 @@ __extension__ extern unsigned long long int	T_PTROBJ
 __locale_t					T_PTROBJ
 char * __const *				T_PTROBJ
 const __sigset_t *				T_PTROBJ
-const char *					T_PTROBJ
+# The next line was originally autogenerated by h2xs, which gave the
+# type of "const char *" as T_PTROBJ -- a pointer to an opaque object.
+# This prevented the return value of ZOOM_record_get() from being
+# translated into a Perl string.  Instead, I am using T_PV, which
+# works properly.
+const char *					T_PV
 const char **					T_PTROBJ
 const struct timespec *				T_PTROBJ
 div_t						T_OPAQUE_STRUCT
-- 
1.7.10.4