Mercurial > pidgin
annotate plugins/perl/common/Prpl.xs @ 13561:104fbbfc91fb
[gaim-migrate @ 15940]
beta3 for the RPM spec file too
committer: Tailor Script <tailor@pidgin.im>
| author | Stu Tomlinson <stu@nosnilmot.com> |
|---|---|
| date | Sat, 25 Mar 2006 15:17:15 +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 |
