Mercurial > pidgin.yaz
comparison gtk/plugins/perl/common/GtkConv.xs @ 14416:eeca8be382a5
[gaim-migrate @ 17124]
This is a Gaim::Gtk perl module for use by gaim plugins to get access to the
gtkgaim interface functions. It isn't complete because anything dealing with
Gtk widgets themselves doesn't work yet (I need to figure out the best way to
do that). To use this a perl plugin just needs to include 'use Gaim::Gtk;'
either on top of 'use Gaim;' or instead of it.
I'm not done with this yet.
At the moment you have to 'use Gaim;' or 'use Gaim::Gtk;' which loads all the
parts, I'm planning to let you actually say 'use Gaim::Gtk::Debug;' to just
get the gtkdebug.h functions. Though 'use Gaim' would work the same way as
always.
committer: Tailor Script <tailor@pidgin.im>
author | Etan Reisner <pidgin@unreliablesource.net> |
---|---|
date | Sat, 02 Sep 2006 05:31:10 +0000 |
parents | |
children | e88aae4f4c40 |
comparison
equal
deleted
inserted
replaced
14415:76d345643ba4 | 14416:eeca8be382a5 |
---|---|
1 #include "gtkmodule.h" | |
2 | |
3 /* This can't work at the moment since I don't have a typemap for Gtk::Widget. | |
4 * I thought about using the one from libgtk2-perl but wasn't sure how to go | |
5 * about doing that. | |
6 guint | |
7 gaim_gtk_conversations_fill_menu(menu, convs) | |
8 Gtk::Widget menu | |
9 SV *convs | |
10 PREINIT: | |
11 GList *t_GL; | |
12 int i, t_len; | |
13 PPCODE: | |
14 t_GL = NULL; | |
15 t_len = av_len((AV *)SvRV(convs)); | |
16 | |
17 for (i = 0; i < t_len; i++) { | |
18 STRLEN t_sl; | |
19 t_GL = g_list_append(t_GL, SvPV(*av_fetch((AV *)SvRV(convs), i, 0), t_sl)); | |
20 } | |
21 gaim_gtk_conversations_fill_menu(menu, t_GL); | |
22 */ | |
23 | |
24 /* This can't work at the moment since I don't have a typemap for Gtk::Widget. | |
25 * I thought about using the one from libgtk2-perl but wasn't sure how to go | |
26 * about doing that. | |
27 GdkPixbuf | |
28 gaim_gtkconv_get_tab_icon(conv, small_icon) | |
29 Gaim::Conversation conv | |
30 gboolean small_icon | |
31 */ | |
32 | |
33 /* This can't work at the moment since I don't have a typemap for gboolean *. | |
34 int | |
35 gaim_gtkconv_get_tab_at_xy(win, x, y, to_right) | |
36 Gaim::Gtk::Conversation::Window win | |
37 int x | |
38 int y | |
39 gboolean * to_right | |
40 */ | |
41 | |
42 MODULE = Gaim::Gtk::Conversation PACKAGE = Gaim::Gtk::Conversation PREFIX = gaim_gtkconv_ | |
43 PROTOTYPES: ENABLE | |
44 | |
45 void | |
46 gaim_gtkconv_update_buddy_icon(conv) | |
47 Gaim::Conversation conv | |
48 | |
49 void | |
50 gaim_gtkconv_switch_active_conversation(conv) | |
51 Gaim::Conversation conv | |
52 | |
53 void | |
54 gaim_gtkconv_update_tabs() | |
55 | |
56 void | |
57 gaim_gtkconv_update_buttons_by_protocol(conv) | |
58 Gaim::Conversation conv | |
59 | |
60 void | |
61 gaim_gtkconv_present_conversation(conv) | |
62 Gaim::Conversation conv | |
63 | |
64 Gaim::Gtk::Conversation::Window | |
65 gaim_gtkconv_get_window(conv) | |
66 Gaim::Gtk::Conversation conv | |
67 | |
68 void | |
69 gaim_gtkconv_new(conv) | |
70 Gaim::Conversation conv | |
71 | |
72 gboolean | |
73 gaim_gtkconv_is_hidden(gtkconv) | |
74 Gaim::Gtk::Conversation gtkconv | |
75 | |
76 MODULE = Gaim::Gtk::Conversation PACKAGE = Gaim::Gtk::Conversations PREFIX = gaim_gtk_conversations_ | |
77 PROTOTYPES: ENABLE | |
78 | |
79 void | |
80 gaim_gtk_conversations_find_unseen_list(type, min_state, hidden_only, max_count) | |
81 Gaim::ConversationType type | |
82 Gaim::UnseenState min_state | |
83 gboolean hidden_only | |
84 guint max_count | |
85 | |
86 void * | |
87 gaim_gtk_conversations_get_handle() |