Enlightenment CVS committal Author : leviathan Project : e17 Module : proto
Dir : e17/proto/etk-perl Modified Files: EtkTypes.c TODO Log Message: - more fixes to the signals, now modifiers work and there are constants for them - iconbox now works too =================================================================== RCS file: /cvs/e/e17/proto/etk-perl/EtkTypes.c,v retrieving revision 1.11 retrieving revision 1.12 diff -u -3 -r1.11 -r1.12 --- EtkTypes.c 26 Aug 2006 16:03:43 -0000 1.11 +++ EtkTypes.c 26 Aug 2006 17:54:09 -0000 1.12 @@ -562,7 +562,10 @@ S_STORE("keyname", ev->keyname) S_STORE("key", ev->key) S_STORE("string", ev->string) + S_STORE("compose", ev->compose) I_STORE("timestamp", newSVuv(ev->timestamp)) + I_STORE("modifiers", newSVuv(ev->modifiers)) + I_STORE("locks", newSVuv(ev->locks)) return newRV_inc((SV*)hv); } @@ -574,7 +577,10 @@ S_STORE("keyname", ev->keyname) S_STORE("key", ev->key) S_STORE("string", ev->string) + S_STORE("compose", ev->compose) I_STORE("timestamp", newSVuv(ev->timestamp)) + I_STORE("modifiers", newSVuv(ev->modifiers)) + I_STORE("locks", newSVuv(ev->locks)) return newRV_inc((SV*)hv); } @@ -591,6 +597,8 @@ I_STORE("widget.x", newSViv(ev->widget.x)) I_STORE("widget.y", newSViv(ev->widget.y)) I_STORE("timestamp", newSVuv(ev->timestamp)) + I_STORE("modifiers", newSVuv(ev->modifiers)) + I_STORE("locks", newSVuv(ev->locks)) return newRV_noinc((SV*)hv); } @@ -610,6 +618,8 @@ I_STORE("prev.widget.x", newSViv(ev->prev.widget.x)) I_STORE("prev.widget.y", newSViv(ev->prev.widget.y)) I_STORE("timestamp", newSVuv(ev->timestamp)) + I_STORE("modifiers", newSVuv(ev->modifiers)) + I_STORE("locks", newSVuv(ev->locks)) return newRV_noinc((SV*)hv); } @@ -625,6 +635,9 @@ I_STORE("widget.x", newSViv(ev->widget.x)) I_STORE("widget.y", newSViv(ev->widget.y)) I_STORE("timestamp", newSVuv(ev->timestamp)) + I_STORE("modifiers", newSVuv(ev->modifiers)) + I_STORE("locks", newSVuv(ev->locks)) + I_STORE("flags", newSVuv(ev->flags)) return newRV_inc((SV*)hv); } @@ -640,6 +653,9 @@ I_STORE("widget.x", newSViv(ev->widget.x)) I_STORE("widget.y", newSViv(ev->widget.y)) I_STORE("timestamp", newSVuv(ev->timestamp)) + I_STORE("modifiers", newSVuv(ev->modifiers)) + I_STORE("locks", newSVuv(ev->locks)) + I_STORE("flags", newSVuv(ev->flags)) return newRV_inc((SV*)hv); } @@ -655,6 +671,8 @@ I_STORE("widget.x", newSViv(ev->widget.x)) I_STORE("widget.y", newSViv(ev->widget.y)) I_STORE("timestamp", newSVuv(ev->timestamp)) + I_STORE("modifiers", newSVuv(ev->modifiers)) + I_STORE("locks", newSVuv(ev->locks)) return newRV_noinc((SV*)hv); } @@ -670,6 +688,8 @@ I_STORE("widget.x", newSViv(ev->widget.x)) I_STORE("widget.y", newSViv(ev->widget.y)) I_STORE("timestamp", newSVuv(ev->timestamp)) + I_STORE("modifiers", newSVuv(ev->modifiers)) + I_STORE("locks", newSVuv(ev->locks)) return newRV_noinc((SV*)hv); } =================================================================== RCS file: /cvs/e/e17/proto/etk-perl/TODO,v retrieving revision 1.16 retrieving revision 1.17 diff -u -3 -r1.16 -r1.17 --- TODO 19 Aug 2006 10:42:19 -0000 1.16 +++ TODO 26 Aug 2006 17:54:09 -0000 1.17 @@ -1,6 +1,5 @@ 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, ------------------------------------------------------------------------- Using Tomcat but need to do more? Need to support web services, security? Get stuff done quickly with pre-integrated technology to make your job easier Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642 _______________________________________________ enlightenment-cvs mailing list enlightenment-cvs@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs