Enlightenment CVS committal
Author : leviathan
Project : e17
Module : proto
Dir : e17/proto/etk-perl
Modified Files:
Changes Etk.xs MANIFEST META.yml Makefile.PL README TODO
typemap
Log Message:
- fixes to Etk::Window methods
- rewrote the TODO
- more tests
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/Changes,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -3 -r1.2 -r1.3
--- Changes 30 Jul 2006 19:50:29 -0000 1.2
+++ Changes 6 Aug 2006 14:56:12 -0000 1.3
@@ -1,5 +1,9 @@
Revision history for Perl extension Etk.
+0.03 Sun Aug 6 12:09:59 GMT+2 2006
+ - removed Etk/Object.pm and replaced the function conversion with
ALIASes in XS
+ - Followed changes to etk
+
0.02 Sun Jul 30 17:53:12 GMT+2 2006
- rewrite of Etk-Perl
+ Removed all .pm code
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/Etk.xs,v
retrieving revision 1.39
retrieving revision 1.40
diff -u -3 -r1.39 -r1.40
--- Etk.xs 5 Aug 2006 21:47:18 -0000 1.39
+++ Etk.xs 6 Aug 2006 14:56:12 -0000 1.40
@@ -2489,6 +2489,12 @@
ALIAS:
ButtonsSet=1
+Etk_Message_Dialog_Type
+etk_message_dialog_message_type_get(dialog)
+ Etk_Message_Dialog * dialog
+ ALIAS:
+ MessageTypeGet=1
+
void
etk_message_dialog_message_type_set(dialog, type)
Etk_Message_Dialog * dialog
@@ -2662,6 +2668,8 @@
SV * value
ALIAS:
DataSet=1
+ CODE:
+ etk_object_data_set(object, key, newSVsv(value));
void
etk_object_notification_callback_add(object, property_name, callback, data)
@@ -5186,10 +5194,17 @@
DecoratedSet=1
void
-etk_window_deiconify(window)
+etk_window_iconified_set(window, iconified)
+ Etk_Window * window
+ Etk_Bool iconified
+ ALIAS:
+ IconifiedSet=1
+
+Etk_Bool
+etk_window_iconified_get(window)
Etk_Window * window
ALIAS:
- Deiconify=1
+ IconifiedGet=1
void
etk_window_dnd_aware_set(window, on)
@@ -5198,17 +5213,31 @@
ALIAS:
DndAwareSet=1
+Etk_Bool
+etk_window_focused_get(window)
+ Etk_Window * window
+ ALIAS:
+ FocusedGet=1
+
void
-etk_window_focus(window)
+etk_window_focused_set(window, focused)
Etk_Window * window
+ Etk_Bool focused
ALIAS:
- Focus=1
+ FocusedSet=1
+
+Etk_Bool
+etk_window_fullscreen_get(window)
+ Etk_Window * window
+ ALIAS:
+ FullscreenGet=1
void
-etk_window_fullscreen(window)
+etk_window_fullscreen_set(window, fullscreen)
Etk_Window * window
+ Etk_Bool fullscreen
ALIAS:
- Fullscreen=1
+ FullscreenSet=1
void
etk_window_geometry_get(window)
@@ -5234,47 +5263,18 @@
ALIAS:
HideOnDelete=1
-void
-etk_window_iconify(window)
- Etk_Window * window
- ALIAS:
- Iconify=1
-
-Etk_Bool
-etk_window_is_focused(window)
- Etk_Window * window
- ALIAS:
- IsFocused=1
-
-Etk_Bool
-etk_window_is_fullscreen(window)
- Etk_Window * window
- ALIAS:
- IsFullscreen=1
-
Etk_Bool
-etk_window_is_iconified(window)
+etk_window_maximized_get(window)
Etk_Window * window
ALIAS:
- IsIconified=1
-
-Etk_Bool
-etk_window_is_maximized(window)
- Etk_Window * window
- ALIAS:
- IsMaximized=1
-
-Etk_Bool
-etk_window_is_sticky(window)
- Etk_Window * window
- ALIAS:
- IsSticky=1
+ MaximizedGet=1
void
-etk_window_maximize(window)
+etk_window_maximized_set(window, maximized)
Etk_Window * window
+ Etk_Bool maximized
ALIAS:
- Maximize=1
+ MaximizedSet=1
void
etk_window_move(window, x, y)
@@ -5345,11 +5345,18 @@
ALIAS:
SkipTaskbarHintSet=1
+Etk_Bool
+etk_window_sticky_get(window)
+ Etk_Window * window
+ ALIAS:
+ StickyGet=1
+
void
-etk_window_stick(window)
+etk_window_sticky_set(window, sticky)
Etk_Window * window
+ Etk_Bool sticky
ALIAS:
- Stick=1
+ StickySet=1
const char *
etk_window_title_get(window)
@@ -5363,30 +5370,6 @@
char * title
ALIAS:
TitleSet=1
-
-void
-etk_window_unfocus(window)
- Etk_Window * window
- ALIAS:
- Unfocus=1
-
-void
-etk_window_unfullscreen(window)
- Etk_Window * window
- ALIAS:
- Unfullscreen=1
-
-void
-etk_window_unmaximize(window)
- Etk_Window * window
- ALIAS:
- Unmaximize=1
-
-void
-etk_window_unstick(window)
- Etk_Window * window
- ALIAS:
- Unstick=1
void
etk_window_wmclass_set(window, window_name, window_class)
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/MANIFEST,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -3 -r1.5 -r1.6
--- MANIFEST 5 Aug 2006 21:49:06 -0000 1.5
+++ MANIFEST 6 Aug 2006 14:56:13 -0000 1.6
@@ -30,6 +30,10 @@
t/Etk/Iconbox.t
t/Etk/Image.t
t/Etk/Label.t
+t/Etk/Menu.t
+t/Etk/MessageDialog.t
+t/Etk/Notebook.t
+t/Etk/Object.t
t/Etk/Window.t
fallback/const-c.inc
fallback/const-xs.inc
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/META.yml,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -3 -r1.2 -r1.3
--- META.yml 30 Jul 2006 19:22:31 -0000 1.2
+++ META.yml 6 Aug 2006 14:56:13 -0000 1.3
@@ -1,7 +1,7 @@
# http://module-build.sourceforge.net/META-spec.html
#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
name: Etk
-version: 0.02
+version: 0.03
version_from: lib/Etk.pm
installdirs: site
requires:
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/Makefile.PL,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -3 -r1.5 -r1.6
--- Makefile.PL 30 Jul 2006 19:22:31 -0000 1.5
+++ Makefile.PL 6 Aug 2006 14:56:13 -0000 1.6
@@ -3,18 +3,18 @@
# See lib/ExtUtils/MakeMaker.pm for details of how to influence
# the contents of the Makefile that is written.
WriteMakefile(
- DISTNAME => 'Etk',
+ DISTNAME => 'Etk-Perl',
NAME => 'Etk',
VERSION_FROM => 'lib/Etk.pm',
PREREQ_PM => {},
($] >= 5.005 ?
- (ABSTRACT_FROM => 'lib/Etk.pm',
+ (ABSTRACT => 'Perl bindings for the Enlightened ToolKit (Etk)',
AUTHOR => 'Hisham Mardam Bey <[EMAIL PROTECTED]>') : ()),
LIBS => [`etk-config --libs`],
DEFINE => '', # '-DDEBUG',
INC => "-g -I. `etk-config --cflags`",
XSPROTOARG => '-noprototypes',
-
+ test => {TESTS=>'t/Etk/*.t'},
OBJECT => '$(O_FILES)',
);
if (eval {require ExtUtils::Constant; 1}) {
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/README,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -3 -r1.5 -r1.6
--- README 5 Aug 2006 21:47:18 -0000 1.5
+++ README 6 Aug 2006 14:56:13 -0000 1.6
@@ -1,4 +1,4 @@
-Etk version 0.02
+Etk version 0.03
================
These are the Etk bindings for the Enlightenment Toolkit (etk)
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/TODO,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -3 -r1.12 -r1.13
--- TODO 5 Aug 2006 20:51:19 -0000 1.12
+++ TODO 6 Aug 2006 14:56:13 -0000 1.13
@@ -1,44 +1,24 @@
-General TODO:
-=============
-- callback system needs to convert event structs to perl equivalents
-- port evas key modifiers and locks
-- perldoc everything
-- create Test cases
+TODO:
+ - callback system needs to convert event structs to perl equivalents
+ - port evas key modifiers and locks
+ - perldoc everything
+ - complete Tests
+ - Check for memory usage (I'm not sure if we're leaking or not,
+ need to do some tests for that)
+ - Add cache for perl objects which will help keep track of the C objects
+ - Fix Combobox append functions (waiting for some functionality in etk)
-Done:
-=====
-- etk_main.h [DONE]
-- wrap up functions that use (...): important ones are combo for now [DONE]
-- etk_marshallers.h [DONE]
-- etk_toplevel_widget.h [DONE]
-- etk_colorpicker_*.h [DONE]
-- create an evas_list to perl list converter [DONE]
-- etk_radio_button.h [DONE]
-- etk_argument.h [NOT NEEDED]
-- etk_cache.h [NOT NEEDED]
-- etk_string.h [NOT NEEDED]
-- etk_propery.h [NOT NEEDED]
-- all functions that use use references to change multiple values need
- to return a list of values to the perl caller [DONE]
-- finish remaining signal_connect functions (swapped etc.) [DONE]
-- etk_theme.h [DONE]
-- finish up etk_widget.h [DONE]
-- add some commonly used internal tree sorters to avoid the entire
- perl -> c -> perl ... loop when sorting trees. [DONE]
-- etk_property.h [NOT NEEDED]
-- etk_types.h [DONE]
-- etk_type.h [NOT NEEDED]
-- etk_utils.h [NOT NEEDED]
-- go over all list functions and check as necessary [DONE]
-- go over all enums and structs and port as needed [DONE]
-- finish porting etk_test from C to perl [DONE]
-- etk_text_iter.h [DONE]
-- etk_text_view.h [DONE]
-- etk_textblock.h [DONE]
-- etk_editable_text_object.h [NOT NEEDED]
-- finish signal callback functions [DONE]
+BUGS:
+ - make test is defining PERL_DL_NONLAZY=1 for some reason and
+ fails to load the library, for now you can run:
+ $ perl -MExtUtils::Command::MM -e "test_harness(0, 'blib/lib',
'blib/arch')" t/Etk/*.t
+
+ - some methods return Etk::Widget, there's no way to know
+ what the original type of the object was, and the object
+ is unusable most of the time unless you bless it into its
+ original package. (The cache in the TODO above will help solve this)
Pending:
-========
-etk_canvas.h
+ -etk_canvas.h
+
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/typemap,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -3 -r1.10 -r1.11
--- typemap 5 Aug 2006 21:47:18 -0000 1.10
+++ typemap 6 Aug 2006 14:56:13 -0000 1.11
@@ -44,7 +44,7 @@
Etk_Menu_Shell * T_PTROBJ_ETK
Etk_Message_Dialog * T_PTROBJ_ETK
Etk_Message_Dialog_Buttons T_IV
-Etk_Message_Dialog_Type T_PTROBJ
+Etk_Message_Dialog_Type T_IV
Etk_Notebook * T_PTROBJ_ETK
Etk_Object * T_PTROBJ_ETK
Etk_Paned * T_PTROBJ_ETK
-------------------------------------------------------------------------
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
