comparison: libpurple/plugins/perl/common/Account.xs
libpurple/plugins/perl/common/Account.xs
- branch
- release-2.1.0
- changeset 18121
- 2d8ea56b9097
- parent 17283
- ceb0e3374ddf
- child 18122
- 9bf9970c1b6a
equal
deleted
inserted
replaced
| 18120:aefaf97dfa23 | 18121:2d8ea56b9097 |
|---|---|
| 288 size_t new_index | 288 size_t new_index |
| 289 | 289 |
| 290 void | 290 void |
| 291 purple_accounts_get_all() | 291 purple_accounts_get_all() |
| 292 PREINIT: | 292 PREINIT: |
| 293 GList *l; | 293 const GList *l; |
| 294 PPCODE: | 294 PPCODE: |
| 295 for (l = purple_accounts_get_all(); l != NULL; l = l->next) { | 295 for (l = purple_accounts_get_all(); l != NULL; l = l->next) { |
| 296 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Account"))); | 296 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Purple::Account"))); |
| 297 } | 297 } |
| 298 | 298 |
