view plugins/perl/common/Connection.xs @ 10804:6dcfec6f2f7c

[gaim-migrate @ 12452] make -f Makefile.mingw WINDRES=i386-mingw32-windres CC=i386-mingw32-gcc PERL=/usr/bin/perl EXTUTILS=/usr/lib/perl5/5.8.3/ExtUtils GMSGFMT=/usr/bin/msgfmt MAKENSIS=~/build/win32/win32-dev/NSIS/makensis install committer: Tailor Script <[e-mail]>

#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")));