Mon, 19 Mar 2007 17:37:17 +0000
Pidgin perl fixes for s/gaim/purple/.
| 14478 | 1 | #include "gtkmodule.h" |
| 2 | ||
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
3 | MODULE = Pidgin::Conversation PACKAGE = Pidgin::Conversation PREFIX = pidgin_conv_ |
| 14478 | 4 | PROTOTYPES: ENABLE |
| 5 | ||
| 6 | void | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
7 | pidgin_conv_update_buddy_icon(conv) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
8 | Purple::Conversation conv |
| 14478 | 9 | |
| 10 | void | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
11 | pidgin_conv_switch_active_conversation(conv) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
12 | Purple::Conversation conv |
| 14478 | 13 | |
| 14 | void | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
15 | pidgin_conv_update_buttons_by_protocol(conv) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
16 | Purple::Conversation conv |
| 14478 | 17 | |
| 18 | void | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
19 | pidgin_conv_present_conversation(conv) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
20 | Purple::Conversation conv |
| 14478 | 21 | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
22 | Pidgin::Conversation::Window |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
23 | pidgin_conv_get_window(conv) |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
24 | Pidgin::Conversation conv |
| 14478 | 25 | |
| 26 | void | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
27 | pidgin_conv_new(class, conv) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
28 | Purple::Conversation conv |
| 14652 | 29 | C_ARGS: |
| 30 | conv | |
| 14478 | 31 | |
| 32 | gboolean | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
33 | pidgin_conv_is_hidden(gtkconv) |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
34 | Pidgin::Conversation gtkconv |
| 14478 | 35 | |
|
15127
5fc0e97f117d
[gaim-migrate @ 17849]
Daniel Atallah <datallah@pidgin.im>
parents:
14780
diff
changeset
|
36 | void |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
37 | pidgin_conv_get_gtkconv(conv) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
38 | Purple::Conversation conv |
|
15127
5fc0e97f117d
[gaim-migrate @ 17849]
Daniel Atallah <datallah@pidgin.im>
parents:
14780
diff
changeset
|
39 | PPCODE: |
|
15711
cd8a32e0e0b5
I like being able to compile :-)
Luke Schierer <lschiere@pidgin.im>
parents:
15590
diff
changeset
|
40 | if (conv != NULL && PIDGIN_IS_PIDGIN_CONVERSATION(conv)) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
41 | XPUSHs(sv_2mortal(purple_perl_bless_object( |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
42 | PIDGIN_CONVERSATION(conv), |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
43 | "Pidgin::Conversation"))); |
|
15127
5fc0e97f117d
[gaim-migrate @ 17849]
Daniel Atallah <datallah@pidgin.im>
parents:
14780
diff
changeset
|
44 | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
45 | MODULE = Pidgin::Conversation PACKAGE = Pidgin::Conversations PREFIX = pidgin_conversations_ |
| 14478 | 46 | PROTOTYPES: ENABLE |
| 47 | ||
| 48 | void | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
49 | pidgin_conversations_find_unseen_list(type, min_state, hidden_only, max_count) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
50 | Purple::ConversationType type |
|
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
51 | Pidgin::UnseenState min_state |
| 14478 | 52 | gboolean hidden_only |
| 53 | guint max_count | |
| 54 | ||
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15711
diff
changeset
|
55 | Purple::Handle |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15435
diff
changeset
|
56 | pidgin_conversations_get_handle() |