Skip Menu |

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

Report information
The Basics
Id: 33224
Status: resolved
Priority: 0/
Queue: Tk-PathEntry

People
Owner: Nobody in particular
Requestors: pdebuyl [...] ulb.ac.be
Cc:
AdminCc:

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



Subject: Can't locate Tk/Finish.pm
Date: Wed, 13 Feb 2008 19:00:17 +0100
To: bug-Tk-PathEntry [...] rt.cpan.org
From: Pierre de Buyl <pdebuyl [...] ulb.ac.be>
Version: PathEntry.pm v 3.0 perl version : perl v5.8.6 OS : Mac OS X 10.4.11 , i386 platform, uname -a gives Darwin hostname 8.11.1 Darwin Kernel Version 8.11.1: Wed Oct 10 18:23:28 PDT 2007; root:xnu-792.25.20~1/RELEASE_I386 i386 i386 Bug : The following message pops up when the PathEntry widget is in focus and I click out of it : ****** Assuming 'require Tk::Finish;' at ./writeinit.pl line 99 Tk::Error: Can't locate Tk/Finish.pm in @INC (@INC contains: ... $mw- Show quoted text
>bind($class,"<$_-Right>" => '_forward_path_component'); .) at /
Library/Perl/5.8.6/darwin-thread-multi-2level/Tk/Widget.pm line 270. Tk::Widget::_AutoloadTkWidget at /Library/Perl/5.8.6/darwin-thread- multi-2level/Tk/Widget.pm line 268 Tk::Widget::AUTOLOAD at /Library/Perl/5.8.6/darwin-thread- multi-2level/Tk/Widget.pm line 338 Tk::PathEntry::__ANON__ at PathEntry.pm line 73 <FocusOut> (command bound to event) ****** I tracked the bug to the line 72 and 73 of PathEntry.pm : my $choices_t = $w->Subwidget("ChoicesToplevel"); $choices_t->Finish; which I commented out and replaced by $w->Finish; The ChoicesTopLevel does not seem to know the Finish method. The following code reproduces the error when setting the pathentry widget out of focus. ****** #!/usr/bin/perl use Tk; use Tk::PathEntry; use Cwd; my $mw = new MainWindow; my $localpath = cwd(); $mw->PathEntry(-textvariable=>\$localpath)->pack(); $mw->Entry(-textvariable=>\$sometext)->pack(); MainLoop; ****** I don't know if what I did may cause other bugs, but I thougt I would signal the one I found. Pierre de Buyl ----------------------------------------------------------- Pierre de Buyl Physique Non-Linéaire et Mécanique Statistique Université Libre de Bruxelles - CP 231 1050 Ixelles - Belgique mail: pdebuylATulb.ac.be tél: +32 (0)2 650 57 97 fax: +32 (0)2 650 57 67 -----------------------------------------------------------
Should be fixed with 3.05. Regards, Slaven