home *** CD-ROM | disk | FTP | other *** search
- package Tk::InputO;
- require Tk;
-
- @ISA = qw(Tk::Widget);
-
- Construct Tk::Widget 'InputO';
-
- bootstrap Tk::InputO $Tk::VERSION;
-
- sub Tk_cmd { \&Tk::inputo }
-
- #EnterMethods Tk::InputO __FILE__,qw(add addchild anchor column
- # delete dragsite dropsite entrycget
- # entryconfigure geometryinfo hide item info
- # nearest see selection show xview yview);
-
- 1;
-
-