view plugins/perl/common/Prpl.xs @ 11249:b4b1be482b4e

[gaim-migrate @ 13418] sf patch #1235519, from Sadrul Habib Chowdhury This is a pretty big patch that makes Gaim correctly save and restore the current status (away/available, away message, available message, invisible, etc). The GaimGtkStatusBoxWidget thing I think defaults to "Available" every time its created, which overrides the setting that was saved to the XML file. So that still needs to be fixed before this will really work. Anyway, mad props to Sadrul for putting up with my requests on this patch committer: Tailor Script <[e-mail]>

#include "module.h"

/* TODO
gaim_prpl_got_account_statu(s) ... variable arguments lists suck.

*/

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) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem")));
        }



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_account_warning_level(account, username, level)
	Gaim::Account account
	const char *username
	unsigned int level

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

void 
gaim_prpl_got_user_warning_level(account, name, level)
	Gaim::Account account
	const char *name
	unsigned int level