From 197327de66840a783e2490e81878fa03f862df2f Mon Sep 17 00:00:00 2001
From: Jeff Hobbs <hobbs@users.sourceforge.net>
Date: Thu, 19 Oct 2000 00:36:05 +0000
Subject: [PATCH] 	* tkcon.tcl (::tkcon::NamespacesList): corrected to
 not use window 	starting with an uppercase letter (error). (reins)

---
 ChangeLog | 5 +++++
 tkcon.tcl | 2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index e4cfe73..c299767 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2000-10-18  Jeff Hobbs  <hobbs@ajubasolutions.com>
+
+	* tkcon.tcl (::tkcon::NamespacesList): corrected to not use window
+	starting with an uppercase letter (error). (reins)
+
 2000-09-27  Jeff Hobbs  <hobbs@scriptics.com>
 
 	* 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 \
-- 
2.23.0