Hi -
I'm having a problem with Tk bind. In my script, I want to do some
processing at windows activation, so I coded:
$MAIN = MainWindow->new (-title => 'Play .wav file');
$MAIN->bind ('<Activate>' => sub {DoMainActivate ()});
...
and so on. The window works, but DoMainActivate is never called (confirmed
with the debugger).
Using ActivePerl 5.6.1 w/Tk 800.023 on Win32 (W2K).
Aloha - Beau.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
