Mercurial > pidgin.yaz
annotate plugins/perl/common/Prpl.xs @ 13853:bbf0470cb348
[gaim-migrate @ 16312]
Improvement/fixing of GntTree. Do the scrolling and stuff without 'reliably'.
committer: Tailor Script <tailor@pidgin.im>
author | Sadrul Habib Chowdhury <imadil@gmail.com> |
---|---|
date | Fri, 23 Jun 2006 00:45:45 +0000 |
parents | 33cb3206af90 |
children |
rev | line source |
---|---|
11118 | 1 #include "module.h" |
2 | |
3 MODULE = Gaim::Prpl PACKAGE = Gaim::Find PREFIX = gaim_find_ | |
4 PROTOTYPES: ENABLE | |
5 | |
6 Gaim::Plugin | |
7 gaim_find_prpl(id) | |
8 const char *id | |
9 | |
10 MODULE = Gaim::Prpl PACKAGE = Gaim::Prpl PREFIX = gaim_prpl_ | |
11 PROTOTYPES: ENABLE | |
12 | |
12792
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
13 void |
11118 | 14 gaim_prpl_change_account_status(account, old_status, new_status) |
15 Gaim::Account account | |
16 Gaim::Status old_status | |
17 Gaim::Status new_status | |
18 | |
19 void | |
20 gaim_prpl_get_statuses(account, presence) | |
21 Gaim::Account account | |
22 Gaim::Presence presence | |
23 PREINIT: | |
12792
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
24 GList *l; |
11118 | 25 PPCODE: |
12792
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
26 for (l = gaim_prpl_get_statuses(account,presence); l != NULL; l = l->next) { |
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
27 /* XXX Someone please test and make sure this is the right |
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
28 * type for these things. */ |
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
29 XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Status"))); |
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
30 } |
11118 | 31 |
12792
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
32 void |
11118 | 33 gaim_prpl_got_account_idle(account, idle, idle_time) |
34 Gaim::Account account | |
35 gboolean idle | |
36 time_t idle_time | |
37 | |
12792
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
38 void |
11118 | 39 gaim_prpl_got_account_login_time(account, login_time) |
40 Gaim::Account account | |
41 time_t login_time | |
42 | |
12792
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
43 void |
11118 | 44 gaim_prpl_got_user_idle(account, name, idle, idle_time) |
45 Gaim::Account account | |
46 const char *name | |
47 gboolean idle | |
48 time_t idle_time | |
49 | |
12792
33cb3206af90
[gaim-migrate @ 15139]
Etan Reisner <pidgin@unreliablesource.net>
parents:
11290
diff
changeset
|
50 void |
11118 | 51 gaim_prpl_got_user_login_time(account, name, login_time) |
52 Gaim::Account account | |
53 const char *name | |
54 time_t login_time |