diff options
| author | dgp <dgp@noemail.net> | 2005-04-22 16:26:03 (GMT) |
|---|---|---|
| committer | dgp <dgp@noemail.net> | 2005-04-22 16:26:03 (GMT) |
| commit | c2954d4ffc2150292dda50f5470c853338654525 (patch) | |
| tree | de11c06e5a7472e20e1323d0a50d51c0b7fbf7e4 /tests/string.test | |
| parent | a47812dd72dbbd006ef751505d6c1355c84648ab (diff) | |
| download | tcl-c2954d4ffc2150292dda50f5470c853338654525.zip tcl-c2954d4ffc2150292dda50f5470c853338654525.tar.gz tcl-c2954d4ffc2150292dda50f5470c853338654525.tar.bz2 | |
typo
FossilOrigin-Name: b4f40c1307aadff1f924cf7ece19c52919764fe0
Diffstat (limited to 'tests/string.test')
| -rw-r--r-- | tests/string.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/string.test b/tests/string.test index 4a32e42..45bb587 100644 --- a/tests/string.test +++ b/tests/string.test @@ -12,7 +12,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: string.test,v 1.44 2005/04/22 16:18:30 dgp Exp $ +# RCS: @(#) $Id: string.test,v 1.45 2005/04/22 16:26:04 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -1391,7 +1391,7 @@ test string-22.13 {string wordstart, unicode} { test string-23.0 {string is boolean, Bug 1187123} testindexobj { set x 5 - catch {testindexobj $x foo} + catch {testindexobj $x foo bar soom} string is boolean $x } 0 |