Re: [tcltk-perl] %replace_options question
Brought to you by:
hobbs
From: Vadim K. <va...@ar...> - 2004-04-23 21:05:02
|
> > while implementing pTk compatibility widget "BrowseEntry" I > > used %replace_options and it looks to me keys to this hash > > must be perlTk name and not Tcl/Tk name, because different > > widgets could be implemented with a single Tcl/Tk widget (it > > appears BrowseEntry cound be implemented with ComboBox) > > > > Should I change %replace_options logic a bit? > > If that's what is necessary, although I don't know quite what you mean > without an example ... I just added few lines to implement perlTk's BrowseEntry Browseentry.pm in perlTk lives in "Tixish" directory, but I did not found it in Tix. Nevertheless, it appears BrowseEntry could be implemented with ComboBox. So I add ComboBox => {-choices=>'-values'}, to %replace_options This is slightly odd, because someone who previously inserted that line to hash did not intended to have "-choices". Another way will be better: I'll add key pair BrowseEntry => {-choices=>'-values'}, and nothing outside said widget will be touched. Interesting to say, implementing perlTk's TList in a level needed by my application, ended with adding just one line to %ptk2tcltk and fwe lines to need_tk! Vadim. |