Mercurial > pidgin

annotate libgaim/plugins/perl/common/Core.xs @ 15314:4a4e1dfd8716

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 18105] Can't use new protocol version because of different login scheme. Revert to old version. committer: Tailor Script <tailor@pidgin.im>
author Mark Huetsch <markhuetsch>
date Thu, 11 Jan 2007 07:26:28 +0000
parents 5e07a6f8eb33
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
15004
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
1 #include "module.h"
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
2
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
3 MODULE = Gaim::Core PACKAGE = Gaim::Core PREFIX = gaim_core_
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
4 PROTOTYPES: ENABLE
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
5
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
6 gboolean
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
7 gaim_core_quit_cb()
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
8 PPCODE:
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
9 /* The argument to gaim_core_quit_cb is not used,
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
10 * so there's little point in requiring it on the
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
11 * Perl side. */
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
12 RETVAL = gaim_core_quit_cb(NULL);
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
13 ST(0) = boolSV(RETVAL);
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
14 sv_2mortal(ST(0));
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
15
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
16 const char *
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
17 gaim_core_get_version()
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
18
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
19 const char *
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
20 gaim_core_get_ui()
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
21
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
22 void
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
23 gaim_core_set_ui_ops(ops)
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
24 Gaim::Core::UiOps ops
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
25
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
26 Gaim::Core::UiOps
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
27 gaim_core_get_ui_ops()
5e07a6f8eb33 [gaim-migrate @ 17784]
Richard Laager <rlaager@wiktel.com>
parents:
diff changeset
28