comparison: plugins/perl/common/BuddyList.xs
plugins/perl/common/BuddyList.xs
- changeset 12919
- 519199cca273
- parent 12866
- 279ff67770c9
equal
deleted
inserted
replaced
| 12918:36e9d07f56c3 | 12919:519199cca273 |
|---|---|
| 220 Gaim::BuddyList::Node node | 220 Gaim::BuddyList::Node node |
| 221 PREINIT: | 221 PREINIT: |
| 222 GList *l; | 222 GList *l; |
| 223 PPCODE: | 223 PPCODE: |
| 224 for (l = gaim_blist_node_get_extended_menu(node); l != NULL; l = l->next) { | 224 for (l = gaim_blist_node_get_extended_menu(node); l != NULL; l = l->next) { |
| 225 /* XXX I'm pretty sure this is what should be being used here, | 225 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Menu::Action"))); |
| 226 * not that it really matters since perl doesn't really have a | |
| 227 * way to interact with a GaimBlistNodeAction anyway. */ | |
| 228 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::BuddyList::Node::Action"))); | |
| 229 } | 226 } |
| 230 | 227 |
| 231 void | 228 void |
| 232 gaim_blist_set_ui_ops(ops) | 229 gaim_blist_set_ui_ops(ops) |
| 233 Gaim::BuddyList::UiOps ops | 230 Gaim::BuddyList::UiOps ops |
