[perl-Glib-Object-Introspection] Fix compiling against g-i < 1.29.17



commit c59177f1a58a6248661ab0301f7fae1f21667c7c
Author: Torsten SchÃnfeld <kaffeetisch gmx de>
Date:   Wed Jan 30 17:27:46 2013 +0100

    Fix compiling against g-i < 1.29.17

 GObjectIntrospection.xs |    2 +-
 gperl-i11n-info.c       |    2 ++
 gperl-i11n-method.c     |    2 ++
 3 files changed, 5 insertions(+), 1 deletions(-)
---
diff --git a/GObjectIntrospection.xs b/GObjectIntrospection.xs
index 7d907a9..6024b0f 100644
--- a/GObjectIntrospection.xs
+++ b/GObjectIntrospection.xs
@@ -910,7 +910,7 @@ _use_generic_signal_marshaller_for (class, const gchar *package, const gchar *si
 	warn ("*** Cannot use generic signal marshallers for signal %s of %s "
 	      "unless gobject-introspection >= 1.33.10; "
 	      "any handlers connected to the signal "
-	      "might thus be invoked incorrectly",
+	      "might thus be invoked incorrectly\n",
 	      signal, package);
 }
 #endif
diff --git a/gperl-i11n-info.c b/gperl-i11n-info.c
index 42c8752..843afcc 100644
--- a/gperl-i11n-info.c
+++ b/gperl-i11n-info.c
@@ -3,6 +3,7 @@
 static GIFunctionInfo *
 _find_enum_method (GIEnumInfo *info, const gchar *method)
 {
+#if GI_CHECK_VERSION (1, 29, 17)
 	gint n_methods;
 	gint i;
 	n_methods = g_enum_info_get_n_methods (info);
@@ -13,6 +14,7 @@ _find_enum_method (GIEnumInfo *info, const gchar *method)
 			return method_info;
 		g_base_info_unref (method_info);
 	}
+#endif
 	return NULL;
 }
 
diff --git a/gperl-i11n-method.c b/gperl-i11n-method.c
index 639d050..1759721 100644
--- a/gperl-i11n-method.c
+++ b/gperl-i11n-method.c
@@ -49,7 +49,9 @@ store_methods (HV *namespaced_functions, GIBaseInfo *info, GIInfoType info_type)
 	    case GI_INFO_TYPE_ENUM:
 	    case GI_INFO_TYPE_FLAGS:
 	    {
+#if GI_CHECK_VERSION (1, 29, 17)
 		PUSH_METHODS (enum, av, info);
+#endif
 		break;
 	    }
 



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]