diff options
| author | dgp <dgp@noemail.net> | 2002-07-12 21:08:47 (GMT) |
|---|---|---|
| committer | dgp <dgp@noemail.net> | 2002-07-12 21:08:47 (GMT) |
| commit | 5d79f1ca560bb8be052c404b6bf7e413f4287d3a (patch) | |
| tree | 324b81919ba9b29c1d80c92b462203c6220febbd /tests/textBTree.test | |
| parent | 114b021c2e7e9fc5ae4b3899a1e473eb0d1be015 (diff) | |
| download | tk-5d79f1ca560bb8be052c404b6bf7e413f4287d3a.zip tk-5d79f1ca560bb8be052c404b6bf7e413f4287d3a.tar.gz tk-5d79f1ca560bb8be052c404b6bf7e413f4287d3a.tar.bz2 | |
* Converted several files in the Tk test suite for testing by
tcltest 2.1.
FossilOrigin-Name: 4b0cdc1bb7ef77230512e5c3d8aa7d8286082c7a
Diffstat (limited to 'tests/textBTree.test')
| -rw-r--r-- | tests/textBTree.test | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/textBTree.test b/tests/textBTree.test index 855a8f3..9088f28 100644 --- a/tests/textBTree.test +++ b/tests/textBTree.test @@ -8,11 +8,11 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: textBTree.test,v 1.3 1999/04/16 01:51:41 stanton Exp $ +# RCS: @(#) $Id: textBTree.test,v 1.4 2002/07/12 21:08:49 dgp Exp $ -if {[lsearch [namespace children] ::tcltest] == -1} { - source [file join [pwd] [file dirname [info script]] defs.tcl] -} +package require tcltest 2.1 +namespace import -force tcltest::test +eval tcltest::configure $argv catch {destroy .t} text .t |