plugins/perl/common/Connection.xs

Thu, 30 Oct 2003 19:21:14 +0000

author
Herman Bloggs <herman@bluedigits.com>
date
Thu, 30 Oct 2003 19:21:14 +0000
changeset 7383
d6b354fc9ea2
parent 6584
9785a533d08e
child 11118
36db35a9da56
permissions
-rw-r--r--

[gaim-migrate @ 7978]
fix autosplit complaint

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

mercurial