Enlightenment CVS committal
Author : leviathan
Project : e17
Module : libs/etk-perl
Dir : e17/libs/etk-perl/etk_test
Modified Files:
etk_test.pl
Log Message:
Combobox changes
===================================================================
RCS file: /cvs/e/e17/libs/etk-perl/etk_test/etk_test.pl,v
retrieving revision 1.48
retrieving revision 1.49
diff -u -3 -r1.48 -r1.49
--- etk_test.pl 29 Jan 2007 13:55:44 -0000 1.48
+++ etk_test.pl 8 Mar 2007 18:58:35 -0000 1.49
@@ -731,8 +731,8 @@
$vbox2->Append($image);
$combobox = Etk::Combobox->new();
- $combobox->ColumnAdd(ColumnTypeImage, 24, 0, 0, 0, 0.0, 0.5);
- $combobox->ColumnAdd(ColumnTypeLabel, 75, 1, 0, 0, 0.0, 0.5);
+ $combobox->ColumnAdd(ColumnTypeImage, 24, 0, 0.0);
+ $combobox->ColumnAdd(ColumnTypeLabel, 75, 1, 0.0);
$combobox->Build();
$vbox2->Append($combobox);
@@ -746,13 +746,13 @@
$item->DataSet($i);
}
- $combobox->ActiveItemSet($combobox->ActiveItemGet());
+ #$combobox->ActiveItemSet($combobox->ActiveItemGet());
$combobox->SignalConnect("active_item_changed",
sub {
- my $item = $combobox->ActiveItemGet();
- my $stock_id = $item->DataGet();
- $image->SetFromStock($stock_id, SizeBig);
+# my $item = $combobox->ActiveItemGet();
+# my $stock_id = $item->DataGet();
+# $image->SetFromStock($stock_id, SizeBig);
}
);
-------------------------------------------------------------------------
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
