summaryrefslogtreecommitdiff
path: root/src/perl/perl-common.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/perl/perl-common.c')
-rw-r--r--src/perl/perl-common.c5
1 files changed, 0 insertions, 5 deletions
diff --git a/src/perl/perl-common.c b/src/perl/perl-common.c
index 68a1631e..9fe8d587 100644
--- a/src/perl/perl-common.c
+++ b/src/perl/perl-common.c
@@ -584,13 +584,8 @@ static void perl_register_protocol(CHAT_PROTOCOL_REC *rec)
chat_type = chat_protocol_lookup(rec->name);
g_return_if_fail(chat_type >= 0);
-#if GLIB_MAJOR_VERSION < 2
- name = g_strdup(rec->name);
- g_strdown(name+1);
-#else
name = g_ascii_strdown(rec->name,-1);
*name = *(rec->name);
-#endif
/* window items: channel, query */
type = module_get_uniq_id_str("WINDOW ITEM TYPE", "CHANNEL");