Tue, 10 Jun 2008 16:18:12 +0000
Add another translation: wud -> would
| 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::Window PACKAGE = Pidgin::Conversation::Window PREFIX = pidgin_conv_window_ |
| 14478 | 4 | PROTOTYPES: ENABLE |
| 5 | ||
|
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
|
6 | 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
|
7 | pidgin_conv_window_new(class) |
| 14652 | 8 | C_ARGS: /* void */ |
| 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_window_destroy(win) |
|
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
|
12 | Pidgin::Conversation::Window win |
| 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_window_show(win) |
|
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
|
16 | Pidgin::Conversation::Window win |
| 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_window_hide(win) |
|
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
|
20 | Pidgin::Conversation::Window win |
| 14478 | 21 | |
| 22 | 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
|
23 | pidgin_conv_window_raise(win) |
|
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::Window win |
| 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_window_switch_gtkconv(win, 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
|
28 | Pidgin::Conversation::Window win |
|
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
|
29 | Pidgin::Conversation gtkconv |
| 14478 | 30 | |
| 31 | 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
|
32 | pidgin_conv_window_add_gtkconv(win, 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
|
33 | Pidgin::Conversation::Window win |
|
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 | |
| 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_window_remove_gtkconv(win, 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
|
38 | Pidgin::Conversation::Window win |
|
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
|
39 | Pidgin::Conversation gtkconv |
| 14478 | 40 | |
|
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
|
41 | Pidgin::Conversation |
|
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_conv_window_get_gtkconv_at_index(win, index) |
|
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::Window win |
| 14478 | 44 | int index |
| 45 | ||
|
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
|
46 | Pidgin::Conversation |
|
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
|
47 | pidgin_conv_window_get_active_gtkconv(win) |
|
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
|
48 | Pidgin::Conversation::Window win |
| 14478 | 49 | |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
50 | Purple::Conversation |
|
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
|
51 | pidgin_conv_window_get_active_conversation(win) |
|
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
|
52 | Pidgin::Conversation::Window win |
| 14478 | 53 | |
| 54 | 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
|
55 | pidgin_conv_window_is_active_conversation(conv) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
56 | Purple::Conversation conv |
| 14478 | 57 | |
| 58 | 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
|
59 | pidgin_conv_window_has_focus(win) |
|
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
|
60 | Pidgin::Conversation::Window win |
| 14478 | 61 | |
|
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
|
62 | 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
|
63 | pidgin_conv_window_get_at_xy(x, y) |
| 14478 | 64 | int x |
| 65 | int y | |
| 66 | ||
| 67 | 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
|
68 | pidgin_conv_window_get_gtkconvs(win) |
|
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
|
69 | Pidgin::Conversation::Window win |
| 14478 | 70 | PREINIT: |
| 71 | GList *l; | |
| 72 | PPCODE: | |
|
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
|
73 | for (l = pidgin_conv_window_get_gtkconvs(win); l != NULL; l = l->next) { |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
74 | XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Pidgin::Conversation"))); |
| 14478 | 75 | } |
| 76 | ||
| 77 | guint | |
|
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
|
78 | pidgin_conv_window_get_gtkconv_count(win) |
|
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
|
79 | Pidgin::Conversation::Window win |
| 14478 | 80 | |
|
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
|
81 | 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
|
82 | pidgin_conv_window_first_with_type(type) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
83 | Purple::ConversationType type |
| 14478 | 84 | |
|
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
|
85 | 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
|
86 | pidgin_conv_window_last_with_type(type) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
87 | Purple::ConversationType type |
| 14478 | 88 | |
|
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
|
89 | MODULE = Pidgin::Conversation::Window PACKAGE = Pidgin::Conversation::Placement PREFIX = pidgin_conv_placement_ |
| 14478 | 90 | PROTOTYPES: ENABLE |
| 91 | ||
| 92 | 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
|
93 | pidgin_conv_placement_get_options() |
| 14478 | 94 | PREINIT: |
| 95 | GList *l; | |
| 96 | PPCODE: | |
|
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
|
97 | for (l = pidgin_conv_placement_get_options(); l != NULL; l = l->next) { |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
98 | XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Pidgin::Conversation::Window"))); |
| 14478 | 99 | } |
| 100 | ||
| 101 | 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
|
102 | pidgin_conv_placement_add_fnc(id, name, fnc) |
| 14478 | 103 | const char * id |
| 104 | const char * name | |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
105 | Pidgin::Conversation::PlacementFunc fnc |
| 14478 | 106 | |
| 107 | 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
|
108 | pidgin_conv_placement_remove_fnc(id) |
| 14478 | 109 | const char * id |
| 110 | ||
| 111 | const char * | |
|
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
|
112 | pidgin_conv_placement_get_name(id) |
| 14478 | 113 | const char * id |
| 114 | ||
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
115 | Pidgin::Conversation::PlacementFunc |
|
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
|
116 | pidgin_conv_placement_get_fnc(id) |
| 14478 | 117 | const char * id |
| 118 | ||
| 119 | 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
|
120 | pidgin_conv_placement_set_current_func(func) |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
121 | Pidgin::Conversation::PlacementFunc func |
| 14478 | 122 | |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
123 | Pidgin::Conversation::PlacementFunc |
|
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
|
124 | pidgin_conv_placement_get_current_func() |
| 14478 | 125 | |
| 126 | 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
|
127 | pidgin_conv_placement_place(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
|
128 | Pidgin::Conversation gtkconv |
| 14478 | 129 | |
|
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
|
130 | MODULE = Pidgin::Conversation::Window PACKAGE = Pidgin::Conversation::Windows PREFIX = pidgin_conv_windows_ |
| 14478 | 131 | PROTOTYPES: ENABLE |
| 132 | ||
| 133 | 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
|
134 | pidgin_conv_windows_get_list() |
| 14478 | 135 | PREINIT: |
| 136 | GList *l; | |
| 137 | PPCODE: | |
|
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
|
138 | for (l = pidgin_conv_windows_get_list(); l != NULL; l = l->next) { |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
139 | XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Pidgin::Conversation::Window"))); |
| 14478 | 140 | } |