Enlightenment CVS committal Author : leviathan Project : e17 Module : proto
Dir : e17/proto/etk-perl/etk_test Modified Files: etk_test.pl Log Message: - fix for tree_sorting callbacks - Etk::Timer fix - Etk::Signal stuff =================================================================== RCS file: /cvs/e/e17/proto/etk-perl/etk_test/etk_test.pl,v retrieving revision 1.31 retrieving revision 1.32 diff -u -3 -r1.31 -r1.32 --- etk_test.pl 4 Aug 2006 23:23:53 -0000 1.31 +++ etk_test.pl 5 Aug 2006 20:51:19 -0000 1.32 @@ -1,7 +1,6 @@ use strict; use POSIX; use Etk; -use Etk::Timer; use Etk::Constants qw/:all/; use Etk::Stock qw/:all/; @@ -369,7 +368,7 @@ return 1; } ); - + my $timer2 = Etk::Timer->new(0.025, sub { $pbar2->Pulse(); @@ -507,7 +506,7 @@ $button->SignalConnect("clicked", sub { - #$tree->Sort(\&tree_col2_compare_cb, $ascendant, $tree->cols->[1], undef); + #$tree->Sort(\&tree_col2_compare_cb, $ascendant, $col2, undef); $tree->SortNumeric($ascendant, $col2, undef); $ascendant = !$ascendant; } ------------------------------------------------------------------------- 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