Mercurial > pidgin

view plugins/perl/common/Gaim.xs @ 6528:390807f638b1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 7045] 1000 * 1000 * seconds == bad. committer: Tailor Script <tailor@pidgin.im>
author Christian Hammond <chipx86@chipx86.com>
date Wed, 20 Aug 2003 11:02:39 +0000
parents 2e2593d95121
children 1690791f0c70
line wrap: on
line source

#include "module.h"
#include "../perl-handlers.h"

MODULE = Gaim  PACKAGE = Gaim
PROTOTYPES: ENABLE

void
timeout_add(plugin, seconds, func, arg)
	Gaim::Plugin plugin
	int seconds
	const char *func
	void *arg
CODE:
	gaim_perl_timeout_add(plugin, seconds, func, arg);

void
debug(category, string)
	const char *category
	const char *string
CODE:
	gaim_debug(GAIM_DEBUG_INFO, category, string);

void
deinit()
PREINIT:
	GList *l;
CODE:
	gaim_perl_timeout_clear();


BOOT:
	GAIM_PERL_BOOT(Account);