[libglib-object-introspection-perl] 08/13: Harmonize the format of type names in error messages

Intrigeri intrigeri at moszumanska.debian.org
Fri Mar 13 19:45:53 UTC 2015


This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to branch experimental
in repository libglib-object-introspection-perl.

commit db106fc215f70b4f85bbadc31c6bd709593cacf3
Author: Torsten Schönfeld <kaffeetisch at gmx.de>
Date:   Sun Jan 18 19:58:21 2015 +0100

    Harmonize the format of type names in error messages
---
 GObjectIntrospection.xs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/GObjectIntrospection.xs b/GObjectIntrospection.xs
index afcc98a..3ed829d 100644
--- a/GObjectIntrospection.xs
+++ b/GObjectIntrospection.xs
@@ -397,7 +397,7 @@ _register_types (class, namespace, package)
 		info_type = g_base_info_get_type (info);
 		name = g_base_info_get_name (info);
 
-		dwarn ("setting up %s.%s\n", namespace, name);
+		dwarn ("setting up %s::%s\n", namespace, name);
 
 		if (info_type == GI_INFO_TYPE_CONSTANT) {
 			av_push (constants, newSVpv (name, 0));
@@ -448,7 +448,7 @@ _register_types (class, namespace, package)
 
 		type = get_gtype ((GIRegisteredTypeInfo *) info);
 		if (!type) {
-			ccroak ("Could not find GType for type %s::%s",
+			ccroak ("Could not find GType for type %s%s",
 			       namespace, name);
 		}
 		if (type == G_TYPE_NONE) {
@@ -543,7 +543,7 @@ _register_boxed_synonym (class, const gchar *reg_basename, const gchar *reg_name
 	reg_info = g_irepository_find_by_name (repository, reg_basename, reg_name);
 	reg_type = reg_info ? get_gtype (reg_info) : 0;
 	if (!reg_type)
-		ccroak ("Could not lookup GType for type %s.%s",
+		ccroak ("Could not lookup GType for type %s%s",
 		        reg_basename, reg_name);
 
 	/* The GType in question (e.g., GdkRectangle) hasn't been loaded yet,
@@ -759,7 +759,7 @@ _install_overrides (class, basename, object_name, target_package)
 	GType gtype;
 	gpointer klass;
     CODE:
-	dwarn ("_install_overrides: %s.%s for %s\n",
+	dwarn ("_install_overrides: %s%s for %s\n",
 	       basename, object_name, target_package);
 	repository = g_irepository_get_default ();
 	info = g_irepository_find_by_name (repository, basename, object_name);
@@ -856,7 +856,7 @@ _invoke_fallback_vfunc (class, vfunc_package, vfunc_name, target_package, ...)
 	gint field_offset;
 	gpointer func_pointer;
     PPCODE:
-	dwarn ("_invoke_fallback_vfunc: %s.%s, target = %s\n",
+	dwarn ("_invoke_fallback_vfunc: %s::%s, target = %s\n",
 	       vfunc_package, vfunc_name, target_package);
 	gtype = gperl_object_type_from_package (target_package);
 	klass = g_type_class_peek (gtype);

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libglib-object-introspection-perl.git



More information about the Pkg-perl-cvs-commits mailing list