Skip Menu |

This queue is for tickets about the Tk-DynaTabFrame CPAN distribution.

Report information
The Basics
Id: 47179
Status: new
Priority: 0/
Queue: Tk-DynaTabFrame

People
Owner: Nobody in particular
Requestors: lamprecht [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 0.23
Fixed in: (no value)



Subject: Change after(200, ) to afterIdle() in Configure handling
Hi, the patch attached fixes a problem that arises because of a hardcoded 200 ms delay: DynaTabFrame unexpectedly takes away focus from other widgets. Discussed at http://perlmonks.org/?node_id=773062 Cheers, Christoph
Subject: DynaTabFrame.pm.patch
--- C:\Dokumente und Einstellungen\chris\Desktop\Tk-DynaTabFrame-0.23\DynaTabFrame-ori.pm Mi Mai 25 20:23:18 2005 +++ C:\Dokumente und Einstellungen\chris\Desktop\Tk-DynaTabFrame-0.23\DynaTabFrame.pm Sa Jun 20 09:13:23 2009 @@ -292,7 +292,7 @@ $this->afterCancel($this->{LastAfterID}) if defined($this->{LastAfterID}); - $this->{LastAfterID} = $this->after(200, # $this->cget('-delay'), + $this->{LastAfterID} = $this->afterIdle( # $this->cget('-delay'), sub { $this->TabReconfig(); delete $this->{LastAfterID};