pidgin/plugins/perl/common/GtkMenuTray.xs@24ffae1874f1 (annotated)
pidgin/plugins/perl/common/GtkMenuTray.xs
Sun, 09 Nov 2008 20:55:10 +0000
- author
- Marcus Lundblad <malu@pidgin.im>
- date
- Sun, 09 Nov 2008 20:55:10 +0000
- branch
- maiku.vv
- changeset 26159
- 24ffae1874f1
- parent 15590
- c07dd12bf3f4
- child 18068
- b6554e3c8224
- permissions
- -rw-r--r--
Added menu items to buddy list context menu to start voice and video sessions
After discussing the matter with Maiku, we decided to have two choises.
"Audio call" which will show up if audio sessions is possible with a buddy and
the other item is either "Audio/Video" or "Video" depending on if the buddy
supports both at the same time or not
| 14478 | 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 | Gtk::Widget | |
|
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_menu_tray_new() |
| 14478 | 8 | |
| 9 | Gtk::Widget | |
|
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
|
10 | pidgin_menu_tray_get_box(menu_tray) |
|
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::MenuTray menu_tray |
| 14478 | 12 | |
| 13 | 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
|
14 | pidgin_menu_tray_append(menu_tray, widget, tooltip) |
|
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::MenuTray menu_tray |
| 14478 | 16 | Gtk::Widget widget |
| 17 | const char * tooltip | |
| 18 | ||
| 19 | 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
|
20 | pidgin_menu_tray_prepend(menu_tray, widget, tooltip) |
|
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
|
21 | Pidgin::MenuTray menu_tray |
| 14478 | 22 | Gtk::Widget widget |
| 23 | const char * tooltip | |
| 24 | ||
| 25 | 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
|
26 | pidgin_menu_tray_set_tooltip(menu_tray, widget, tooltip) |
|
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::MenuTray menu_tray |
| 14478 | 28 | Gtk::Widget widget |
| 29 | const char * tooltip | |
| 30 | */ | |
| 31 | ||
|
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 | MODULE = Pidgin::MenuTray PACKAGE = Pidgin::MenuTray PREFIX = pidgin_menu_tray |
| 14478 | 33 | PROTOTYPES: ENABLE |
