Mercurial > pidgin
changeset 6922:1d994e9b81f9
[gaim-migrate @ 7469]
Group::buddies() now returns the actual buddies. Contacts changed
things slightly. I'll add contact support soon.
committer: Tailor Script <tailor@pidgin.im>
| author | Christian Hammond <chipx86@chipx86.com> |
|---|---|
| date | Wed, 24 Sep 2003 00:55:42 +0000 |
| parents | 11d05ddf30a3 |
| children | ae36c4d693f9 |
| files | plugins/perl/common/BuddyList_Group.xs |
| diffstat | 1 files changed, 8 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/plugins/perl/common/BuddyList_Group.xs Wed Sep 24 00:52:16 2003 +0000 +++ b/plugins/perl/common/BuddyList_Group.xs Wed Sep 24 00:55:42 2003 +0000 @@ -68,10 +68,15 @@ Gaim::BuddyList::Group group PREINIT: GaimBlistNode *node; + GaimBlistNode *contact; GaimBlistNode *_group = (GaimBlistNode *)group; PPCODE: - for (node = _group->child; node != NULL; node = node->next) + for (contact = _group->child; contact != NULL; contact = contact->next) { - XPUSHs(sv_2mortal(gaim_perl_bless_object(node, - "Gaim::BuddyList::Buddy"))); + for (node = contact->child; node != NULL; node = node->next) + { + XPUSHs(sv_2mortal(gaim_perl_bless_object(node, + "Gaim::BuddyList::Buddy"))); + } } +