With the
$f->focus;
in place, everything works nicely!
Btw., the "@_" is passed properly if you use callback syntax in the call to "bind", i.e.:
$f->bind('<Key>' => [sub {print "Key: $_1\n";}, Ev('K')]);
Cheers, Phil In reply to Re^2: Key bindings for Tk::Frame?
by pdsx
in thread Key bindings for Tk::Frame?
by pdsx
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |