Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot

Re: Problem with Tk::chooseColor on Win32

by ldln (Pilgrim)
on May 24, 2007 at 16:28 UTC ( #617262=note: print w/replies, xml ) Need Help??

in reply to Problem with Tk::chooseColor on Win32

Works fine here.

perl5.8.8 (build 817), Tk804.027, WinXP SP2.

Sorry, didn't read text closely enough. Yeah, ugly bug here also if "Cancel" button is pressed. Sorry.

Ok, simple fix. Just make sure you don't try to assign "undef color", if user press cancel. Maybe add simple if test:

... if ($colour) { $colour_button->configure( -background => $colour, -activeback +ground => $colour ); } ...

Replies are listed 'Best First'.
Re^2: Problem with Tk::chooseColor on Win32
by jdtoronto (Prior) on May 24, 2007 at 17:43 UTC
    Thanks for the update ldln, yeah, it is kinda ugly! Now all I have to do is figure out how get the nasty little critter back on his feet instead of lying around on his back!


Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://617262]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (7)
As of 2017-02-20 10:14 GMT
Find Nodes?
    Voting Booth?
    Before electricity was invented, what was the Electric Eel called?

    Results (295 votes). Check out past polls.