From 0bbb06a04a6eef073c35a9b20dd262b5ed7c0902 Mon Sep 17 00:00:00 2001 From: mdejong Date: Wed, 2 May 2001 20:42:37 +0000 Subject: * tools/genStubs.tcl: Add a package require of Tcl 8 at the beginning of the script so that the script will print a descriptive error message when run in an old Tcl 7 shell. --- ChangeLog | 7 +++++++ tools/genStubs.tcl | 4 +++- 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 2ee74b8..32788cb 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +2001-05-02 Don Porter + + * tools/genStubs.tcl: Add a package require of Tcl 8 + at the beginning of the script so that the script + will print a descriptive error message when run + in an old Tcl 7 shell. + 2000-04-27 Kevin Kenny * generic/tclInt.decls: diff --git a/tools/genStubs.tcl b/tools/genStubs.tcl index d131e28..ffa7f24 100644 --- a/tools/genStubs.tcl +++ b/tools/genStubs.tcl @@ -8,7 +8,9 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: genStubs.tcl,v 1.7 1999/06/10 04:29:01 stanton Exp $ +# RCS: @(#) $Id: genStubs.tcl,v 1.8 2001/05/02 20:42:37 mdejong Exp $ + +package require Tcl 8 namespace eval genStubs { # libraryName -- -- cgit v0.12