Mercurial > pidgin
comparison plugins/perl/common/Prpl.xs @ 11118:134d0001983d
[gaim-migrate @ 13174]
Some new xsubs for the perl interpreter and a work around to get it all working again.
committer: Tailor Script <tailor@pidgin.im>
author | John H. Kelm <johnkelm@gmail.com> |
---|---|
date | Mon, 18 Jul 2005 13:37:38 +0000 |
parents | |
children | ecbbe6d18b0d |
comparison
equal
deleted
inserted
replaced
11117:5a8bc4b1f5b6 | 11118:134d0001983d |
---|---|
1 | |
2 #include "module.h" | |
3 | |
4 /* TODO | |
5 gaim_prpl_got_account_statu(s) ... variable arguments lists suck. | |
6 | |
7 */ | |
8 | |
9 MODULE = Gaim::Prpl PACKAGE = Gaim::Find PREFIX = gaim_find_ | |
10 PROTOTYPES: ENABLE | |
11 | |
12 Gaim::Plugin | |
13 gaim_find_prpl(id) | |
14 const char *id | |
15 | |
16 | |
17 MODULE = Gaim::Prpl PACKAGE = Gaim::Prpl PREFIX = gaim_prpl_ | |
18 PROTOTYPES: ENABLE | |
19 | |
20 | |
21 void | |
22 gaim_prpl_change_account_status(account, old_status, new_status) | |
23 Gaim::Account account | |
24 Gaim::Status old_status | |
25 Gaim::Status new_status | |
26 | |
27 void | |
28 gaim_prpl_get_statuses(account, presence) | |
29 Gaim::Account account | |
30 Gaim::Presence presence | |
31 PREINIT: | |
32 GList *l; | |
33 PPCODE: | |
34 for (l = gaim_prpl_get_statuses(account,presence); l != NULL; l = l->next) { | |
35 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::ListItem"))); | |
36 } | |
37 | |
38 | |
39 | |
40 void | |
41 gaim_prpl_got_account_idle(account, idle, idle_time) | |
42 Gaim::Account account | |
43 gboolean idle | |
44 time_t idle_time | |
45 | |
46 void | |
47 gaim_prpl_got_account_login_time(account, login_time) | |
48 Gaim::Account account | |
49 time_t login_time | |
50 | |
51 void | |
52 gaim_prpl_got_account_warning_level(account, username, level) | |
53 Gaim::Account account | |
54 const char *username | |
55 unsigned int level | |
56 | |
57 void | |
58 gaim_prpl_got_user_idle(account, name, idle, idle_time) | |
59 Gaim::Account account | |
60 const char *name | |
61 gboolean idle | |
62 time_t idle_time | |
63 | |
64 void | |
65 gaim_prpl_got_user_login_time(account, name, login_time) | |
66 Gaim::Account account | |
67 const char *name | |
68 time_t login_time | |
69 | |
70 void | |
71 gaim_prpl_got_user_warning_level(account, name, level) | |
72 Gaim::Account account | |
73 const char *name | |
74 unsigned int level | |
75 |