Mercurial > pidgin
diff libpurple/plugins/perl/common/Account.xs @ 24699:34b02adafd9b
merge of 'dd536145a4036177cabc4e4e1ac83dcdf1008a33'
and 'fdb452e89c3d4140034ff12f06a8c3daf350ae5d'
author | John Bailey <rekkanoryo@rekkanoryo.org> |
---|---|
date | Thu, 11 Dec 2008 22:36:47 +0000 |
parents | 68a90c95b722 7fd6e5a72bf1 |
children | 2f3b391b114f |
line wrap: on
line diff
--- a/libpurple/plugins/perl/common/Account.xs Thu Dec 11 22:33:06 2008 +0000 +++ b/libpurple/plugins/perl/common/Account.xs Thu Dec 11 22:36:47 2008 +0000 @@ -105,7 +105,7 @@ int i, t_len; PPCODE: t_GL = NULL; - t_len = av_len((AV *)SvRV(status_types)) + 1; + t_len = av_len((AV *)SvRV(status_types)); for (i = 0; i <= t_len; i++) t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(status_types), i, 0))); @@ -207,7 +207,7 @@ int i, t_len; PPCODE: t_GL = NULL; - t_len = av_len((AV *)SvRV(list)) + 1; + t_len = av_len((AV *)SvRV(list)); for (i = 0; i <= t_len; i++) t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(list), i, 0))); @@ -236,13 +236,13 @@ int i, t_len; PPCODE: t_GL1 = NULL; - t_len = av_len((AV *)SvRV(A)) + 1; + t_len = av_len((AV *)SvRV(A)); for (i = 0; i <= t_len; i++) t_GL1 = g_list_append(t_GL1, SvPVutf8_nolen(*av_fetch((AV *)SvRV(A), i, 0))); t_GL2 = NULL; - t_len = av_len((AV *)SvRV(B)) + 1; + t_len = av_len((AV *)SvRV(B)); for (i = 0; i <= t_len; i++) t_GL2 = g_list_append(t_GL2, SvPVutf8_nolen(*av_fetch((AV *)SvRV(B), i, 0)));