Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: Question regarding focus and Tk

by Chmrr (Vicar)
on May 02, 2002 at 21:14 UTC ( #163667=note: print w/replies, xml ) Need Help??


in reply to Question regarding focus and Tk

you'll want to use :

$i->configure(-state=>substr($regex,0,2) eq 'tr' ? 'disabled' : 'active');

See the Tk::options page for details.

perl -pe '"I lo*`+$^X$\"$]!$/"=~m%(.*)%s;$_=$1;y^`+*^e v^#$&V"+@( NO CARRIER'