Mercurial > pidgin
view plugins/perl/common/Connection.xs @ 8328:645a3d07ee45
[gaim-migrate @ 9052]
there might be a more user-friendly way to do this, but for now, if someone
moves a contact into another group, and there are buddies in that contact
that are already in the new group, just delete the duplicate buddies.
committer: Tailor Script <tailor@pidgin.im>
author | Nathan Walp <nwalp@pidgin.im> |
---|---|
date | Tue, 24 Feb 2004 02:38:52 +0000 |
parents | 6deef41364bd |
children | 134d0001983d |
line wrap: on
line source
#include "module.h" MODULE = Gaim::Connection PACKAGE = Gaim::Connection PREFIX = gaim_connection_ PROTOTYPES: ENABLE void gaim_connection_set_display_name(gc, name) Gaim::Connection gc const char *name Gaim::Account gaim_connection_get_account(gc) Gaim::Connection gc const char * gaim_connection_get_display_name(gc) Gaim::Connection gc MODULE = Gaim::Connections PACKAGE = Gaim::Connections PREFIX = gaim_connections_ PROTOTYPES: ENABLE void gaim_connections_disconnect_all() void * handle() CODE: RETVAL = gaim_connections_get_handle(); OUTPUT: RETVAL MODULE = Gaim::Connection PACKAGE = Gaim void connections() PREINIT: GList *l; PPCODE: for (l = gaim_connections_get_all(); l != NULL; l = l->next) XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Connection")));