libgaim/plugins/perl/common/Prpl.xs

Sat, 19 Aug 2006 01:50:10 +0000

author
Evan Schoenberg <evands@pidgin.im>
date
Sat, 19 Aug 2006 01:50:10 +0000
changeset 14254
77edc7a6191a
parent 14253
core/plugins/perl/common/Prpl.xs@b63ebf84c42b
child 20470
77693555855f
permissions
-rw-r--r--

[gaim-migrate @ 16863]
Renamed 'core' to 'libgaim'

#include "module.h"

MODULE = Gaim::Prpl  PACKAGE = Gaim::Find  PREFIX = gaim_find_
PROTOTYPES: ENABLE

Gaim::Plugin
gaim_find_prpl(id)
	const char *id

MODULE = Gaim::Prpl  PACKAGE = Gaim::Prpl  PREFIX = gaim_prpl_
PROTOTYPES: ENABLE

void
gaim_prpl_change_account_status(account, old_status, new_status)
	Gaim::Account account
	Gaim::Status old_status
	Gaim::Status new_status

void
gaim_prpl_get_statuses(account, presence)
	Gaim::Account account
	Gaim::Presence presence
PREINIT:
	GList *l;
PPCODE:
	for (l = gaim_prpl_get_statuses(account,presence); l != NULL; l = l->next) {
		/* XXX Someone please test and make sure this is the right
		 * type for these things. */
		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Status")));
	}

void
gaim_prpl_got_account_idle(account, idle, idle_time)
	Gaim::Account account
	gboolean idle
	time_t idle_time

void
gaim_prpl_got_account_login_time(account, login_time)
	Gaim::Account account
	time_t login_time

void
gaim_prpl_got_user_idle(account, name, idle, idle_time)
	Gaim::Account account
	const char *name
	gboolean idle
	time_t idle_time

void
gaim_prpl_got_user_login_time(account, name, login_time)
	Gaim::Account account
	const char *name
	time_t login_time

mercurial