Re^2: Calling a TK Method by reference

I don't think this is true --- every Tk geometry manager returns the widget reference so one can write

$widget = $parent->Widget->pack(...);
$widget = $parent->Widget->grid(...);
$widget = $parent->Widget->place(...);
[download]

Comment on Re^2: Calling a TK Method by reference Download Code

Replies are listed 'Best First'.
Re^3: Calling a TK Method by reference by Joost (Canon) on Jul 09, 2004 at 10:23 UTC
update: The docs are wrong. ~~I did not expect it either, and I haven't tested it, but this is from Tk::place (emphasis mine):~~ $slave->place?(-option=>value?, -option=>value, ...?)? The place method arranges for the placer to manage the geometry of $slave. The remaining arguments consist of one or more -option=>value pairs that specify the way in which $slave's geome- try is managed. If the placer is already managing $slave, then the -option=>value pairs modify the configuration for $slave. The place method returns an empty string as result. "What should it profit a man, if he should win a flame war, yet lose his cool?"	[reply]
Re^4: Calling a TK Method by reference by eserte (Deacon) on Jul 09, 2004 at 10:54 UTC
Then the doc is wrong. Which is not surprising, because it is auto-generated from the original Tcl/Tk docs, and in Tcl/Tk there's no need to write something like `set bla [pack [label .l -text hello]]` [download] as there are no widget references, just path names. Who will supply a bug report in RT? :-)	[reply] [d/l]
Re^5: Calling a TK Method by reference by Joost (Canon) on Jul 09, 2004 at 11:07 UTC
You are right `#!/usr/bin/perl -w use strict; use Tk; my $main = Tk::MainWindow->new; my $test = $main->Listbox()->place(-in => $main, -x => 10, -y => 10); print "Test is $test\n"; MainLoop; __END__ Test is Tk::Listbox=HASH(0x83c9684)` [download] "What should it profit a man, if he should win a flame war, yet lose his cool?"	[reply] [d/l]