I've just found out that the oscar perl-Tk rpm has a performance problem
as shown in the following unit-test:
#!/usr/bin/perl -w
#
use Tk;
require Tk::Dialog;
my $top = new MainWindow;
sub show {
my $dialog = $top->Dialog(
-title => "Title",
-bitmap => "error",
-text => "Text message",
-default_button => "OK",
-buttons => [ "OK" ],
);
$dialog->Subwidget( 'bitmap' )->configure( -foreground => 'red' );
$dialog->Subwidget( 'message' )->configure( -foreground => 'red' );
$dialog->Show();
exit 0;
}
my $button = $top->Button(
-text => 'Show',
-command => [ \&show ]
);
$button->pack();
MainLoop;
It's just a simple test of a proper error_window implementation.
The performance problem: there's a noticeable several second delay
within $dialog->show() between the point at which empty base window
appears and when it is fully rendered. The delay is not slow rendering,
but a several second pause before the content flashes up.
When I was playing with this at home, trying to see exactly what the
cause was, I saw no such delay. Repeating this test directly on my
workstation, as opposed to the vmware oscar headnode whence this problem
first appeared confirms the delay.
The difference between the slow and fast environments was perl-Tk -- via
the oscar rpm on vmware and the workstation, and via the cpan perl
module at home. I installed the cpan version on the workstation, and
performance is now fast.
Conclusion: the oscar perl-Tk rpm has some performance problem. I don't
know if this is a version problem, i.e., the rpm's 800.024 version v.
cpan's 804.027, or if this is a problem with the rpm itself.
BTW, the same performance issue is also demonstrated via some demo
code...
--
David N. Lombard
My comments represent my opinions, not those of Intel Corporation.
-------------------------------------------------------
This SF.net email is sponsored by: IT Product Guide on ITManagersJournal
Use IT products in your business? Tell us what you think of them. Give us
Your Opinions, Get Free ThinkGeek Gift Certificates! Click to find out more
http://productguide.itmanagersjournal.com/guidepromo.tmpl
_______________________________________________
Oscar-devel mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/oscar-devel
