Mercurial > pidgin
view plugins/perl/common/BuddyList_Group.xs @ 10296:a7b2fd5efcf2
[gaim-migrate @ 11476]
Some "random updates" updates from patch 1077274 by Felipe Contreras:
"Some changes in the behaviour of slpcalls (for FT),
free some unused structures and properly close
switchboard connections."
Looks good to me, and seems to have fixed a mysterious FT problem that I had
been pretending didn't exist.
committer: Tailor Script <tailor@pidgin.im>
author | Stu Tomlinson <stu@nosnilmot.com> |
---|---|
date | Thu, 02 Dec 2004 16:07:26 +0000 |
parents | 7a8aa87164ae |
children |
line wrap: on
line source
#include "module.h" MODULE = Gaim::BuddyList::Group PACKAGE = Gaim::BuddyList::Group PREFIX = gaim_group_ PROTOTYPES: ENABLE Gaim::BuddyList::Group new(name) const char *name CODE: RETVAL = gaim_group_new(name); OUTPUT: RETVAL void rename(group, new_name) Gaim::BuddyList::Group group const char *new_name CODE: gaim_blist_rename_group(group, new_name); void get_accounts(group) Gaim::BuddyList::Group group PREINIT: GSList *l; PPCODE: for (l = gaim_group_get_accounts(group); l != NULL; l = l->next) XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Account"))); int get_size(group, offline) Gaim::BuddyList::Group group gboolean offline CODE: RETVAL = gaim_blist_get_group_size(group, offline); OUTPUT: RETVAL const char * get_name(group) Gaim::BuddyList::Group group CODE: RETVAL = group->name; OUTPUT: RETVAL int get_online_count(group) Gaim::BuddyList::Group group CODE: RETVAL = gaim_blist_get_group_online_count(group); OUTPUT: RETVAL void buddies(group) Gaim::BuddyList::Group group PREINIT: GaimBlistNode *node; GaimBlistNode *contact; GaimBlistNode *_group = (GaimBlistNode *)group; PPCODE: for (contact = _group->child; contact != NULL; contact = contact->next) { for (node = contact->child; node != NULL; node = node->next) { XPUSHs(sv_2mortal(gaim_perl_bless_object(node, "Gaim::BuddyList::Buddy"))); } }