At 4:16 PM +0000 1/17/00, Hans J�rgen Helgesen wrote:
>Hmmm...
>
>I'm using Tk800.011 on Sun Solaris myself and it's difficult for me
>to try 800.017. The code that fails tries to create Button ($b)
>which is identical to another Button ($h). This is done by obtaining
>all configure options from the old one and pass them to the Button
>constructor. It looks OK to me, but perhaps there are some
>none-portable stuff here?
>
> my @opt = map {$_->[0] => $h->cget($_->[0])} $h->configure;
> my $b=$tl->Button(@opt)->pack(-expand=>1,-fill=>'both');
>
I can't really help you there, since I seldom use Tk myself. The
author of Tk probably could, or you could ask on comp.lang.perl.tk.
800.011 is pretty ancient, isn't it? It wouldn't surprise me if
things have changed.
--
Paul Schinder
[EMAIL PROTECTED]
