Mercurial > pidgin.yaz
comparison libpurple/plugins/perl/common/Account.xs @ 24647: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 |
comparison
equal
deleted
inserted
replaced
24646:36851084b5f2 | 24647:34b02adafd9b |
---|---|
103 PREINIT: | 103 PREINIT: |
104 GList *t_GL; | 104 GList *t_GL; |
105 int i, t_len; | 105 int i, t_len; |
106 PPCODE: | 106 PPCODE: |
107 t_GL = NULL; | 107 t_GL = NULL; |
108 t_len = av_len((AV *)SvRV(status_types)) + 1; | 108 t_len = av_len((AV *)SvRV(status_types)); |
109 | 109 |
110 for (i = 0; i <= t_len; i++) | 110 for (i = 0; i <= t_len; i++) |
111 t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(status_types), i, 0))); | 111 t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(status_types), i, 0))); |
112 | 112 |
113 purple_account_set_status_types(account, t_GL); | 113 purple_account_set_status_types(account, t_GL); |
205 PREINIT: | 205 PREINIT: |
206 GList *t_GL; | 206 GList *t_GL; |
207 int i, t_len; | 207 int i, t_len; |
208 PPCODE: | 208 PPCODE: |
209 t_GL = NULL; | 209 t_GL = NULL; |
210 t_len = av_len((AV *)SvRV(list)) + 1; | 210 t_len = av_len((AV *)SvRV(list)); |
211 | 211 |
212 for (i = 0; i <= t_len; i++) | 212 for (i = 0; i <= t_len; i++) |
213 t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(list), i, 0))); | 213 t_GL = g_list_append(t_GL, SvPVutf8_nolen(*av_fetch((AV *)SvRV(list), i, 0))); |
214 | 214 |
215 purple_account_add_buddies(account, t_GL); | 215 purple_account_add_buddies(account, t_GL); |
234 PREINIT: | 234 PREINIT: |
235 GList *t_GL1, *t_GL2; | 235 GList *t_GL1, *t_GL2; |
236 int i, t_len; | 236 int i, t_len; |
237 PPCODE: | 237 PPCODE: |
238 t_GL1 = NULL; | 238 t_GL1 = NULL; |
239 t_len = av_len((AV *)SvRV(A)) + 1; | 239 t_len = av_len((AV *)SvRV(A)); |
240 | 240 |
241 for (i = 0; i <= t_len; i++) | 241 for (i = 0; i <= t_len; i++) |
242 t_GL1 = g_list_append(t_GL1, SvPVutf8_nolen(*av_fetch((AV *)SvRV(A), i, 0))); | 242 t_GL1 = g_list_append(t_GL1, SvPVutf8_nolen(*av_fetch((AV *)SvRV(A), i, 0))); |
243 | 243 |
244 t_GL2 = NULL; | 244 t_GL2 = NULL; |
245 t_len = av_len((AV *)SvRV(B)) + 1; | 245 t_len = av_len((AV *)SvRV(B)); |
246 | 246 |
247 for (i = 0; i <= t_len; i++) | 247 for (i = 0; i <= t_len; i++) |
248 t_GL2 = g_list_append(t_GL2, SvPVutf8_nolen(*av_fetch((AV *)SvRV(B), i, 0))); | 248 t_GL2 = g_list_append(t_GL2, SvPVutf8_nolen(*av_fetch((AV *)SvRV(B), i, 0))); |
249 | 249 |
250 purple_account_remove_buddies(account, t_GL1, t_GL2); | 250 purple_account_remove_buddies(account, t_GL1, t_GL2); |