libpurple/plugins/perl/common/Prefs.xs

changeset 25122
56e73606e2b2
parent 25107
bd102c539600
parent 25112
4e9dba9e28e6
child 35148
8dcd0006002f
--- a/libpurple/plugins/perl/common/Prefs.xs	Thu Dec 11 22:33:06 2008 +0000
+++ b/libpurple/plugins/perl/common/Prefs.xs	Thu Dec 11 22:36:47 2008 +0000
@@ -51,7 +51,7 @@
 	int i, t_len;
 PPCODE:
 	t_GL = NULL;
-	t_len = av_len((AV *)SvRV(value)) + 1;
+	t_len = av_len((AV *)SvRV(value));
 
 	for (i = 0; i <= t_len; i++)
 		t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(value), i, 0)));
@@ -73,7 +73,7 @@
 	int i, t_len;
 PPCODE:
 	t_GL = NULL;
-	t_len = av_len((AV *)SvRV(value)) + 1;
+	t_len = av_len((AV *)SvRV(value));
 
 	for (i = 0; i <= t_len; i++)
 		t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(value), i, 0)));
@@ -202,7 +202,7 @@
 	int i, t_len;
 PPCODE:
 	t_GL = NULL;
-	t_len = av_len((AV *)SvRV(value)) + 1;
+	t_len = av_len((AV *)SvRV(value));
 
 	for (i = 0; i <= t_len; i++)
 		t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(value), i, 0)));
@@ -224,7 +224,7 @@
 	int i, t_len;
 PPCODE:
 	t_GL = NULL;
-	t_len = av_len((AV *)SvRV(value)) + 1;
+	t_len = av_len((AV *)SvRV(value));
 
 	for (i = 0; i <= t_len; i++)
 		t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(value), i, 0)));

mercurial