diff: libpurple/plugins/perl/common/Roomlist.xs
libpurple/plugins/perl/common/Roomlist.xs
- changeset 25112
- 4e9dba9e28e6
- parent 25106
- 2d9389f32256
- child 25122
- 56e73606e2b2
--- a/libpurple/plugins/perl/common/Roomlist.xs Thu Dec 11 06:38:23 2008 +0000 +++ b/libpurple/plugins/perl/common/Roomlist.xs Thu Dec 11 22:36:29 2008 +0000 @@ -78,7 +78,7 @@ int i, t_len; PPCODE: t_GL = NULL; - t_len = av_len((AV *)SvRV(fields)) + 1; + t_len = av_len((AV *)SvRV(fields)); for (i = 0; i < t_len; i++) t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(fields), i, 0)));
