Mercurial > pidgin

view plugins/perl/common/Cmds.xs @ 12686:5f65a0cca87c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 15029] Clean up the STUN / SRV API a bit. I don't use this stuff, so there was no testing beyond compiling it. I think it's right, though I couldn't find where the STUN discovery status was ever set to 1 (discovering). Anyone know something about that? committer: Tailor Script <tailor@pidgin.im>
author Richard Laager <rlaager@wiktel.com>
date Tue, 03 Jan 2006 00:23:24 +0000
parents b284c703d398
children e1603fd610fa
line wrap: on
line source

#include "module.h"

MODULE = Gaim::Cmds  PACKAGE = Gaim::Cmds  PREFIX = gaim_cmd_
PROTOTYPES: ENABLE

void
gaim_cmd_help(conv, cmd)
	Gaim::Conversation conv
	const gchar *cmd
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_cmd_help(conv, cmd); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
        }

void
gaim_cmd_list(conv)
	Gaim::Conversation conv
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_cmd_list(conv); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListEntry")));
        }

void 
gaim_cmd_unregister(id)
	Gaim::CmdId id