diff options
| author | dgp <dgp@users.sourceforge.net> | 2005-04-22 16:26:04 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2005-04-22 16:26:04 (GMT) |
| commit | 565c9e08a15e4186207fa98a62276aefbc40f62a (patch) | |
| tree | de11c06e5a7472e20e1323d0a50d51c0b7fbf7e4 | |
| parent | cf38de7fcce457f63bdf1debaad415279a9b250a (diff) | |
| download | tcl-565c9e08a15e4186207fa98a62276aefbc40f62a.zip tcl-565c9e08a15e4186207fa98a62276aefbc40f62a.tar.gz tcl-565c9e08a15e4186207fa98a62276aefbc40f62a.tar.bz2 | |
typo
| -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 |