From 4cfc4453e3ec9409df6e6420675409a9868167c5 Mon Sep 17 00:00:00 2001 From: Jeff Hobbs Date: Wed, 27 Sep 2000 21:12:51 +0000 Subject: [PATCH] tkcon.tcl (::tkcon::About): added 'variable COLOR' decl (Zaers) --- ChangeLog | 4 ++++ tkcon.tcl | 1 + 2 files changed, 5 insertions(+) diff --git a/ChangeLog b/ChangeLog index 053f915..e4cfe73 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2000-09-27 Jeff Hobbs + + * tkcon.tcl (::tkcon::About): added 'variable COLOR' decl (Zaers). + 2000-09-20 Jeff Hobbs * 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]} { -- 2.23.0