libgaim/plugins/perl/common/Core.xs

Wed, 17 Jan 2007 18:57:22 +0000

author
Luke Schierer <lschiere@pidgin.im>
date
Wed, 17 Jan 2007 18:57:22 +0000
changeset 15418
bf287f742a5a
parent 15066
57ab37fe1190
permissions
-rw-r--r--

[gaim-migrate @ 18149]
clean out the translations tracker, including some gettext stuff from bjorn

15066
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
1 #include "module.h"
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
2
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
3 MODULE = Gaim::Core PACKAGE = Gaim::Core PREFIX = gaim_core_
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
4 PROTOTYPES: ENABLE
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
5
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
6 gboolean
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
7 gaim_core_quit_cb()
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
8 PPCODE:
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
9 /* The argument to gaim_core_quit_cb is not used,
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
10 * so there's little point in requiring it on the
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
11 * Perl side. */
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
12 RETVAL = gaim_core_quit_cb(NULL);
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
13 ST(0) = boolSV(RETVAL);
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
14 sv_2mortal(ST(0));
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
15
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
16 const char *
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
17 gaim_core_get_version()
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
18
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
19 const char *
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
20 gaim_core_get_ui()
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
21
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
22 void
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
23 gaim_core_set_ui_ops(ops)
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
24 Gaim::Core::UiOps ops
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
25
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
26 Gaim::Core::UiOps
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
27 gaim_core_get_ui_ops()
57ab37fe1190 [gaim-migrate @ 17784]
Richard Laager <rlaager@pidgin.im>
parents:
diff changeset
28

mercurial