[perl-Glib-Object-Introspection] Fix off-by-one error in internal string comparison

[Torsten Schönfeld <tsch src gnome org>]

commit d5862b2a5b2dbc686d8ba4080b99f930fcc08fb0
Author: Torsten Schönfeld <kaffeetisch gmx de>
Date:   Wed Dec 25 19:16:03 2013 +0100

    Fix off-by-one error in internal string comparison

 gperl-i11n-info.c |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/gperl-i11n-info.c b/gperl-i11n-info.c
index 922a8f4..1c60c81 100644
--- a/gperl-i11n-info.c
+++ b/gperl-i11n-info.c
@@ -171,7 +171,7 @@ sythesize_gtype_name (GIBaseInfo *info)
        const gchar *namespace = g_base_info_get_namespace (info);
        const gchar *name = g_base_info_get_name (info);
        if (0 == strncmp (namespace, "GObject", 8) ||
-           0 == strncmp (namespace, "GLib", 4))
+           0 == strncmp (namespace, "GLib", 5))
        {
                namespace = "G";
        }
@@ -185,7 +185,7 @@ sythesize_prefixed_gtype_name (GIBaseInfo *info)
        const gchar *namespace = g_base_info_get_namespace (info);
        const gchar *name = g_base_info_get_name (info);
        if (0 == strncmp (namespace, "GObject", 8) ||
-           0 == strncmp (namespace, "GLib", 4))
+           0 == strncmp (namespace, "GLib", 5))
        {
                namespace = "G";
        }