From: Jeff Hobbs Date: Thu, 19 Oct 2000 00:36:05 +0000 (+0000) Subject: * tkcon.tcl (::tkcon::NamespacesList): corrected to not use window X-Git-Tag: tkcon-2-1~6 X-Git-Url: https://privyetmir.co.uk/gitweb.cgi?a=commitdiff_plain;h=197327de66840a783e2490e81878fa03f862df2f;p=tkcon * tkcon.tcl (::tkcon::NamespacesList): corrected to not use window starting with an uppercase letter (error). (reins) --- diff --git a/ChangeLog b/ChangeLog index e4cfe73..c299767 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2000-10-18 Jeff Hobbs + + * tkcon.tcl (::tkcon::NamespacesList): corrected to not use window + starting with an uppercase letter (error). (reins) + 2000-09-27 Jeff Hobbs * tkcon.tcl (::tkcon::About): added 'variable COLOR' decl (Zaers). diff --git a/tkcon.tcl b/tkcon.tcl index 0ab4c12..2b3e67e 100755 --- a/tkcon.tcl +++ b/tkcon.tcl @@ -1431,7 +1431,7 @@ proc ::tkcon::NamespaceMenu m { proc ::tkcon::NamespacesList {names} { variable PRIV - set f $PRIV(base).Namespaces + set f $PRIV(base).namespaces catch {destroy $f} toplevel $f listbox $f.names -width 30 -height 15 -selectmode single \