diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2005-02-14 09:21:11 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2005-02-14 09:21:11 (GMT) |
| commit | 3569658900ea07e63e3fbea4cd266011a34552ac (patch) | |
| tree | 668c62cebb8b0af16e11f682041dfe5c317b9537 | |
| parent | 3bb0dcee28623c70075a31dd7a61d467d665e483 (diff) | |
| download | tk-3569658900ea07e63e3fbea4cd266011a34552ac.zip tk-3569658900ea07e63e3fbea4cd266011a34552ac.tar.gz tk-3569658900ea07e63e3fbea4cd266011a34552ac.tar.bz2 | |
Encourage missing-DISPLAY errors to be early in run of test suite.
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | tests/all.tcl | 3 |
2 files changed, 8 insertions, 1 deletions
@@ -1,3 +1,9 @@ +2005-02-14 Donal K. Fellows <donal.k.fellows@man.ac.uk> + + * tests/all.tcl: Add a [package require Tk] so that a missing + display causes an early failure and keeps the error trace short. + Issue observed in [FRQ 11122147], even though that's unrelated. + 2005-02-11 Jeff Hobbs <jeffh@ActiveState.com> * library/panedwindow.tcl (::tk::panedwindow::Cursor): check diff --git a/tests/all.tcl b/tests/all.tcl index 56d570f..770ee9c 100644 --- a/tests/all.tcl +++ b/tests/all.tcl @@ -9,10 +9,11 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: all.tcl,v 1.8 2003/04/01 21:06:14 dgp Exp $ +# RCS: @(#) $Id: all.tcl,v 1.9 2005/02/14 09:21:13 dkf Exp $ package require Tcl 8.4 package require tcltest 2.1 +package require Tk ;# This is the Tk test suite; fail early if no Tk! tcltest::configure -testdir [file join [pwd] [file dirname [info script]]] tcltest::configure -loadfile \ [file join [tcltest::testsDirectory] constraints.tcl] |