Mercurial > pidgin
annotate libgaim/plugins/perl/common/SavedStatuses.xs @ 14717:b1fcd2fc903a
[gaim-migrate @ 17471]
Martijn van Beers provided some patches to rework the perl object
casting/blessing for signal instances in order to let the newly added jabber-*
signals work. This is those patches.
This is also a small whitespace change, a removal of the gaim debug message
about "Found plugin info" it was just pissing me off, and a renamespacing of
gaim_blist_node_get_extended_menu into Gaim::Blist::Node where it makes
slightly more sense.
committer: Tailor Script <tailor@pidgin.im>
author | Etan Reisner <pidgin@unreliablesource.net> |
---|---|
date | Thu, 12 Oct 2006 20:38:47 +0000 |
parents | 60b1bc8dbf37 |
children |
rev | line source |
---|---|
14192 | 1 #include "module.h" |
2 | |
3 MODULE = Gaim::SavedStatus PACKAGE = Gaim::SavedStatus PREFIX = gaim_savedstatus_ | |
4 PROTOTYPES: ENABLE | |
5 | |
6 gboolean | |
7 gaim_savedstatus_delete(title) | |
8 const char *title | |
9 | |
10 Gaim::SavedStatus | |
11 gaim_savedstatus_find(title) | |
12 const char *title | |
13 | |
14 const char * | |
15 gaim_savedstatus_get_message(saved_status) | |
16 Gaim::SavedStatus saved_status | |
17 | |
18 const char * | |
19 gaim_savedstatus_get_title(saved_status) | |
20 Gaim::SavedStatus saved_status | |
21 | |
22 Gaim::StatusPrimitive | |
23 gaim_savedstatus_get_type(saved_status) | |
24 Gaim::SavedStatus saved_status | |
25 | |
26 Gaim::SavedStatus | |
27 gaim_savedstatus_new(title, type) | |
28 const char *title | |
29 Gaim::StatusPrimitive type | |
30 | |
31 void | |
32 gaim_savedstatus_set_message(status, message) | |
33 Gaim::SavedStatus status | |
34 const char *message | |
35 | |
36 Gaim::SavedStatus | |
37 gaim_savedstatus_get_current() | |
38 | |
39 MODULE = Gaim::SavedStatus PACKAGE = Gaim::SavedStatuses PREFIX = gaim_savedstatuses_ | |
40 PROTOTYPES: ENABLE | |
41 | |
42 void | |
43 gaim_savedstatuses_get_all() | |
44 PREINIT: | |
45 const GList *l; | |
46 PPCODE: | |
47 for (l = gaim_savedstatuses_get_all(); l != NULL; l = l->next) { | |
48 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::SavedStatus"))); | |
49 } | |
50 | |
14717
b1fcd2fc903a
[gaim-migrate @ 17471]
Etan Reisner <pidgin@unreliablesource.net>
parents:
14192
diff
changeset
|
51 Gaim::Handle |
14192 | 52 gaim_savedstatuses_get_handle() |
53 | |
54 void | |
55 gaim_savedstatuses_init() | |
56 | |
57 void | |
58 gaim_savedstatuses_uninit() |