From: Jeff Hobbs <hobbs@users.sourceforge.net>
Date: Wed, 27 Sep 2000 21:12:51 +0000 (+0000)
Subject: tkcon.tcl (::tkcon::About): added 'variable COLOR' decl (Zaers)
X-Git-Tag: tkcon-2-1~7
X-Git-Url: https://privyetmir.co.uk/gitweb.cgi?a=commitdiff_plain;h=4cfc4453e3ec9409df6e6420675409a9868167c5;p=tkcon

tkcon.tcl (::tkcon::About): added 'variable COLOR' decl (Zaers)
---

diff --git a/ChangeLog b/ChangeLog
index 053f915..e4cfe73 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2000-09-27  Jeff Hobbs  <hobbs@scriptics.com>
+
+	* tkcon.tcl (::tkcon::About): added 'variable COLOR' decl (Zaers).
+
 2000-09-20  Jeff Hobbs  <hobbs@scriptics.com>
 
 	* tkcon.tcl (InitMenus): restricted the Attach Socket
diff --git a/tkcon.tcl b/tkcon.tcl
index dedd014..0ab4c12 100755
--- a/tkcon.tcl
+++ b/tkcon.tcl
@@ -977,6 +977,7 @@ proc ::tkcon::Prompt {{pre {}} {post {}} {prompt {}}} {
 proc ::tkcon::About {} {
     variable OPT
     variable PRIV
+    variable COLOR
 
     set w $PRIV(base).about
     if {[winfo exists $w]} {