Enlightenment CVS committal
Author : leviathan
Project : e17
Module : libs/etk-perl
Dir : e17/libs/etk-perl/xs
Modified Files:
Combobox.xs
Log Message:
Add combobox field set
===================================================================
RCS file: /cvs/e/e17/libs/etk-perl/xs/Combobox.xs,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -3 -r1.3 -r1.4
--- Combobox.xs 29 Jul 2007 07:56:12 -0000 1.3
+++ Combobox.xs 6 Aug 2007 12:43:15 -0000 1.4
@@ -386,9 +386,35 @@
ALIAS:
Remove=1
-# etk_combobox_entry_item_fields_set
+void
+etk_combobox_entry_item_field_set(item, col, data)
+ Etk_Combobox_Entry_Item * item
+ int col
+ SV * data
+ ALIAS:
+ FieldSet=1
+ CODE:
+ if (SvPOK(data))
+ etk_combobox_entry_item_field_set(item, col, (void
*)SvPV_nolen(data));
+ else
+ etk_combobox_entry_item_field_set(item, col, (void
*)SvObj(data, "Etk::Widget"));
-# etk_combobox_entry_item_fields_get
+SV *
+etk_combobox_entry_item_field_get(item, col, type=0)
+ Etk_Combobox_Entry_Item * item
+ int col
+ int type
+ ALIAS:
+ FieldGet=1
+ CODE:
+ void * data;
+ data = etk_combobox_entry_item_field_get(item, col);
+ if (type == 0)
+ RETVAL = sv_2mortal(newSVpv((char *)data, 0));
+ else
+ RETVAL = sv_2mortal(newSVObject((Etk_Widget *)data));
+ OUTPUT:
+ RETVAL
void
etk_combobox_entry_item_data_set(item, data)
@@ -460,37 +486,35 @@
ALIAS:
Remove=1
-# void
-# etk_combobox_item_col_set(item, col, data)
-# Etk_Combobox_Item * item
-# int col
-# SV * data
-# ALIAS:
-# ColSet=1
-# CODE:
-# / if (SvPOK(data))
-# etk_combobox_item_col_set(item, col, SvPV_nolen(data));
-# / else
-# etk_combobox_item_col_set(item, col, SvEtkWidgetPtr(data));
-#
-# SV *
-# etk_combobox_item_col_get(item, col, type=0)
-# Etk_Combobox_Item * item
-# int col
-# int type
-# ALIAS:
-# ColGet=1
-# CODE:
-# void * data;
-# data = etk_combobox_item_col_get(item, col);
-# / if (type == 0)
-# RETVAL = sv_2mortal(newSVpv((char *)data, 0));
-# / else
-# RETVAL = sv_2mortal(newSVEtkWidgetPtr((Etk_Widget *)data));
-# OUTPUT:
-# RETVAL
-
+void
+etk_combobox_item_field_set(item, col, data)
+ Etk_Combobox_Item * item
+ int col
+ SV * data
+ ALIAS:
+ FieldSet=1
+ CODE:
+ if (SvPOK(data))
+ etk_combobox_item_field_set(item, col, (void
*)SvPV_nolen(data));
+ else
+ etk_combobox_item_field_set(item, col, (void *)SvObj(data,
"Etk::Widget"));
+SV *
+etk_combobox_item_field_get(item, col, type=0)
+ Etk_Combobox_Item * item
+ int col
+ int type
+ ALIAS:
+ FieldGet=1
+ CODE:
+ void * data;
+ data = etk_combobox_item_field_get(item, col);
+ if (type == 0)
+ RETVAL = sv_2mortal(newSVpv((char *)data, 0));
+ else
+ RETVAL = sv_2mortal(newSVObject((Etk_Widget *)data));
+ OUTPUT:
+ RETVAL
MODULE = Etk::Combobox PACKAGE = Etk::Combobox PREFIX =
etk_combobox_
-------------------------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc.
Still grepping through log files to find problems? Stop.
Now Search log events and configuration files using AJAX and a browser.
Download your FREE copy of Splunk now >> http://get.splunk.com/
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs
