[PD-dev] tcl 8.5 help browser bug and a fix

[Mike McGonagle]

Well, I know that on the Mac, there is the trouble of having to deal
with Applications being "somewhat" like folders, but when you are
using an Application Open dialog, you can't get into the Application
AS a folder. This prevents the opening of patches from withing PD that
are contained in the Application Bundle, unless you go at it from a
Finder window.


Mike M


On 2/21/07, Miller Puckette <mpuckett at imusic1.ucsd.edu> wrote:
> Hi all,
>
> I don't know how the help browser works (Hans-Christophe wrote it) and
> don't know whether that comment character is in there for some reason
> or not.  So I'm scared to fix this without hearing from HC.
>
> I wonder if the old-fashioned idea of just using the file browser should
> be available as at least an option...
>
> cheers
> Miller
>
> On Sun, Feb 18, 2007 at 10:58:32PM -0500, ico at vt.edu wrote:
> > Hi all,
> >
> > Tried sending a couple of e-mails not realizing I am not subscribed to dev
> > list... DOH! So, please prepare for a small salvo of e-mails :-)
> >
> > Topic #1: tcl/tk 8.5 help browser bug
> >
> > This help browser bug using CVS and tcl/tk 8.5 has been present since at least
> > last fall. After digging through the code, I found the following:
> >
> > proc doc_make_listbox {base dir count} {
> >     # check for [file readable]?
> >     if { [info tclversion] >= 8.5 } {
> >         # requires Tcl 8.5 but probably deals with special chars better
> > #        destroy {expand}[lrange [winfo children $base] [expr {2 * $count}] end]
> >     } else {
> >
> > The comment before "destroy" in effect disables destroying of children widgets
> > and causes errors whenever I have more than one column open and try to click on
> > a column preceding one that is already created. The error reported is that the
> > "listbox1-list already exists" and the only way around is to close the help
> > browser and reopen it. This obviously prevents going up the file tree once a
> > particular subfolder has been opened which obviously means it is a non-lethal
> > bug, but nonetheless annoying.
> >
> > The fix is obvious, remove the comment from the offending line and everything
> > works like a charm:
> >
> > proc doc_make_listbox {base dir count} {
> >     # check for [file readable]?
> >     if { [info tclversion] >= 8.5 } {
> >         # requires Tcl 8.5 but probably deals with special chars better
> >         destroy {expand}[lrange [winfo children $base] [expr {2 * $count}] end]
> >     } else {
> >
> > It would be great if one of the devs/maintiners would please commit this change
> > (I'd do it but I have not bothered to get the CVS dev access).
> >
> > Many thanks!
> >
> > Best wishes,
> >
> > Ico
> >
> >
> >
> > _______________________________________________
> > PD-dev mailing list
> > PD-dev at iem.at
> > http://lists.puredata.info/listinfo/pd-dev
>
> _______________________________________________
> PD-dev mailing list
> PD-dev at iem.at
> http://lists.puredata.info/listinfo/pd-dev
>


-- 
Help the Environment, Plant a Bush back in Texas!

"I place economy among the first and most important republican
virtues, and public debt as the greatest of the dangers to be feared.
To preserve our independence, we must not let our rulers load us with
perpetual debt."
-- Thomas Jefferson, third US president, architect and author (1743-1826)

"Give Peace a Chance" -- John Lennon (9 October 1940 – 8 December 1980)

Peace may sound simple—one beautiful word— but it requires everything
we have, every quality, every strength, every dream, every high ideal.
—Yehudi Menuhin (1916–1999), musician