Enlightenment CVS committal
Author : leviathan
Project : e17
Module : libs/etk-perl
Dir : e17/libs/etk-perl
Modified Files:
Etk.xs
Log Message:
-Add missing Menu* functions
===================================================================
RCS file: /cvs/e/e17/libs/etk-perl/Etk.xs,v
retrieving revision 1.72
retrieving revision 1.73
diff -u -3 -r1.72 -r1.73
--- Etk.xs 14 Jan 2007 20:03:16 -0000 1.72
+++ Etk.xs 14 Jan 2007 20:22:24 -0000 1.73
@@ -2407,6 +2407,11 @@
ALIAS:
SubmenuSet=1
+Etk_Menu *
+etk_menu_item_submenu_get(menu_item)
+ Etk_Menu_Item * menu_item
+ ALIAS:
+ SubmenuGet=1
MODULE = Etk::Menu::Item::Check PACKAGE = Etk::Menu::Item::Check
PREFIX = etk_menu_item_check_
@@ -2487,7 +2492,7 @@
new(class)
SV * class
CODE:
- RETVAL = ETK_MENU_ITEM_RADIO(etk_menu_item_new());
+ RETVAL = ETK_MENU_ITEM_RADIO(etk_menu_item_radio_new(NULL));
OUTPUT:
RETVAL
@@ -2563,6 +2568,28 @@
int y
ALIAS:
PopupAtXy=1
+
+void
+etk_menu_popup_in_direction(menu, direction)
+ Etk_Menu *menu
+ Etk_Popup_Direction direction
+ ALIAS:
+ PopupInDirection=1
+
+void
+etk_menu_popup_at_xy_in_direction(menu, x, y, direction)
+ Etk_Menu *menu
+ int x
+ int y
+ Etk_Popup_Direction direction
+ ALIAS:
+ PopupAtXYInDirection=1
+
+Etk_Menu_Item *
+etk_menu_parent_item_get(menu)
+ Etk_Menu *menu
+ ALIAS:
+ ParentItemGet=1
MODULE = Etk::Menu::Shell PACKAGE = Etk::Menu::Shell PREFIX =
etk_menu_shell_
-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys - and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs
