Skip Menu |

This queue is for tickets about the Tk CPAN distribution.

Report information
The Basics
Id: 70243
Status: resolved
Priority: 0/
Queue: Tk

People
Owner: Nobody in particular
Requestors: user42 [...] zip.com.au
Cc:
AdminCc:

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



Subject: imageInuse() method
Date: Sat, 13 Aug 2011 09:43:56 +1000
To: bug-Tk [...] rt.cpan.org
From: Kevin Ryde <user42 [...] zip.com.au>
In recent debian i386 perl-tk 804.029 and perl 5.12, the docs of Tk::Image show $widget->imageInuse( 'name' ); but there doesn't seem to be any such method, eg. foo.pl below Failed to AUTOLOAD 'MainWindow::imageInuse' at foo.pl line 7 I see the feature is there as $image->image('inuse'); Is there meant to be a mangling method for that, like imageNames()? I wondered if it would be as a method on the image itself, like $image->inuse;
#!/usr/bin/perl -w use strict; use Tk; my $mw = MainWindow->new; my $image = $mw->Photo (-width => 4, -height => 4); my $inuse = $mw->imageInuse($image); # my $inuse = $image->image('inuse'); # my $inuse = $image->inuse; print "inuse is '$inuse'\n"; exit 0;
On 2011-08-12 19:44:08, user42@zip.com.au wrote: Show quoted text
> In recent debian i386 perl-tk 804.029 and perl 5.12, the docs of > Tk::Image show > > $widget->imageInuse( 'name' ); > > but there doesn't seem to be any such method, eg. foo.pl below > > Failed to AUTOLOAD 'MainWindow::imageInuse' at foo.pl line 7 > > > I see the feature is there as > > $image->image('inuse'); > > Is there meant to be a mangling method for that, like imageNames()? > I wondered if it would be as a method on the image itself, like > > $image->inuse; > >
$image->inuse was implemented in Tk-804.029_502. Regards, Slaven