Enlightenment CVS committal
Author : codewarrior
Project : e17
Module : proto
Dir : e17/proto/etk-perl
Modified Files:
Etk.xs
Log Message:
first callback to support data params, we need to apply this for the rest
===================================================================
RCS file: /cvs/e/e17/proto/etk-perl/Etk.xs,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -3 -r1.5 -r1.6
--- Etk.xs 8 Jun 2006 21:58:33 -0000 1.5
+++ Etk.xs 8 Jun 2006 22:01:36 -0000 1.6
@@ -29,7 +29,7 @@
cbd = data;
PUSHMARK(SP);
- //XPUSHs(sv_2mortal(newSV
+ XPUSHs(sv_2mortal(newSVsv(cbd->data)));
PUTBACK ;
/* Call the Perl sub */
_______________________________________________
enlightenment-cvs mailing list
enlightenment-cvs@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs
