Enlightenment CVS committal
Author : leviathan
Project : e17
Module : libs/etk-perl
Dir : e17/libs/etk-perl
Modified Files:
Etk.xs
Log Message:
-Add missing Textblock functions
-Add theme missing functions
===================================================================
RCS file: /cvs/e/e17/libs/etk-perl/Etk.xs,v
retrieving revision 1.69
retrieving revision 1.70
diff -u -3 -r1.69 -r1.70
--- Etk.xs 14 Jan 2007 19:29:47 -0000 1.69
+++ Etk.xs 14 Jan 2007 19:39:40 -0000 1.70
@@ -3792,12 +3792,6 @@
OUTPUT:
RETVAL
-void
-etk_textblock_unrealize(textblock)
- Etk_Textblock * textblock
- ALIAS:
- Unrealize=1
-
const char *
etk_textblock_range_text_get(tb, iter1, iter2, markup)
Etk_Textblock *tb
@@ -3865,6 +3859,31 @@
ALIAS:
DeleteRange=1
+void
+etk_textblock_unicode_length_get(unicode_string)
+ const char *unicode_string
+ ALIAS:
+ UnicodeLengthGet=1
+
+Etk_Bool etk_textblock_is_white_char(c)
+ int c
+ ALIAS:
+ IsWhiteChar=1
+
+void
+etk_textblock_char_size_get(evas, font_face, font_size)
+ Evas * evas
+ const char * font_face
+ int font_size
+ ALIAS:
+ CharSizeGet=1
+ PPCODE:
+ int w, h;
+ etk_textblock_char_size_get(eva, font_face, font_size, &w, &h);
+ EXTEND(SP, 2);
+ PUSHs(sv_2mortal(newSViv(w)));
+ PUSHs(sv_2mortal(newSViv(h)));
+
MODULE = Etk::Theme PACKAGE = Etk::Theme PREFIX = etk_theme_
@@ -3890,7 +3909,15 @@
ALIAS:
WidgetSet=1
+void
+etk_theme_widget_available_themes_get()
+ ALIAS:
+ WidgetAvailableThemesGet=1
+ PPCODE:
+ Evas_List * list;
+ list = etk_theme_widget_available_themes_get();
+ XPUSHs(sv_2mortal(newSVCharEvasList(list)));
const char *
etk_theme_icon_get()
@@ -3903,6 +3930,16 @@
ALIAS:
IconSet=1
+void
+etk_theme_icon_available_themes_get()
+ ALIAS:
+ IconAvailableThemesGet=1
+ PPCODE:
+ Evas_List * list;
+
+ list = etk_theme_icon_available_themes_get();
+ XPUSHs(sv_2mortal(newSVCharEvasList(list)));
+
Etk_Bool
etk_theme_group_exists(file, group, parent)
const char * file
-------------------------------------------------------------------------
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
