Ubuntu 14.04 LTS: perl-tk - slower than 12 LTS
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
perl-tk (Ubuntu) |
New
|
Undecided
|
Unassigned |
Bug Description
Below is a simlified perl-tk code which runs much slower with the new ubuntu 14.04.
The file "bugrun.pl":
#!/usr/bin/perl -w
use strict;
use Tk;
require Tk::TextUndo;
require Tk::Pane;
require Tk::BrowseEntry;
my %s;
my %n;
my $mw=new MainWindow;
my $form3;
my $but2;
my $form1=
$form1-
my $but1=$
$but1->
sub mk1 {
my $r;
foreach $r (1..500) {
$s{fra}
$s{fra}
$s{inv}
$s{inv}
$s{val}
$s{val}
$s{com}
$s{com}
$s{fil}
$s{fil}
$s{fla}
$s{fla}
$s{par}
$s{par}
$s{epa}
$s{epa}
}
}
my $form2=
$form2-
$form3=
$form3-
my $form41=
$form41-
my $form42=
$form42-
my $form43=
$form43-
MainLoop;
__END__
In "xterm":
./bugrun.pl
Closing the window with "x", system waits;
moving mouse on gvim-window creates the warning in "xterm" window:
(gvim:8148): IBUS-WARNING **: Process Key Event failed: Timeout was reached.
The same run but breaking with Ctrl-C - no problems with IBUS.