Skip Menu |

This queue is for tickets about the Tk CPAN distribution.

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

People
Owner: Nobody in particular
Requestors: slaven [...] rezic.de
Cc:
AdminCc:

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



Subject: Tk::Wm::attributes does not work
There are reports in the comp.lang.perl.tk newsgroup that $mw->attributes(-topmost) does not work on Windows. On Linux I get the following error: $ /usr/perl5.8.4d/bin/perl -MTk -e 'tkinit->attributes(-topmost)' bad window path name "-topmost" at /usr/perl5.8.4d/lib/site_perl/5.8.3/i686-linux/Tk/Submethods.pm line 37. Exit 255 It seems that the problem is due to the argument reordering in XStoSubCmd. The reordering is done so that the widget reference is put after the first option. This is correct for Tk::grab, but incorrect for Tk::wm("attributes"). Possible solution: create a XStoWmCmd function which does simple reordering without looking at options. Regards, Slaven
Subject: Re: [cpan #5782] Tk::Wm::attributes does not work
To: bug-Tk [...] rt.cpan.org
Date: Wed, 24 Mar 2004 15:45:08 +0000
From: Nick Ing-Simmons <nick.ing-simmons [...] elixent.com>
RT-Send-Cc:
Slaven_Rezic via RT <bug-Tk@rt.cpan.org> writes: Show quoted text
>This message about Tk was sent to you by SREZIC <SREZIC@cpan.org> via >rt.cpan.org > >Full context and any attached attachments can be found at: <URL: >https://rt.cpan.org/Ticket/Display.html?id=5782 > > >There are reports in the comp.lang.perl.tk newsgroup that $mw->attributes(- >topmost) does not work on Windows.
I wish I could claim this was a deliberate policy to outlaw that abomination but it's just a bug. Show quoted text
>On Linux I get the following error: > >$ /usr/perl5.8.4d/bin/perl -MTk -e 'tkinit->attributes(-topmost)' bad window >path name "-topmost" at /usr/perl5.8.4d/lib/site_perl/5.8.3/i686- >linux/Tk/Submethods.pm line 37. Exit 255 > >It seems that the problem is due to the argument reordering in XStoSubCmd. The >reordering is done so that the widget reference is put after the first option. >This is correct for Tk::grab, but incorrect for Tk::wm("attributes"). Possible >solution: create a XStoWmCmd function which does simple reordering without >looking at options.
There are already several XStoXxxx functions. XStoAfterSub seems to suit?