summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/clock.test2
-rw-r--r--tests/http.test4
2 files changed, 3 insertions, 3 deletions
diff --git a/tests/clock.test b/tests/clock.test
index 8a2218c..8f82b00 100644
--- a/tests/clock.test
+++ b/tests/clock.test
@@ -315,7 +315,7 @@ test clock-1.0 "clock format - wrong # args" {
test clock-1.0.1 "clock format - wrong # args (compiled ensemble with invalid syntax)" {
list [catch {clock format 0 -too-few-options-4-test} msg] $msg $::errorCode
-} [subst {1 {wrong # args: should be "::tcl::clock::format $syntax"} {CLOCK wrongNumArgs}}]
+} [subst {1 {wrong # args: should be "clock format $syntax"} {CLOCK wrongNumArgs}}]
test clock-1.1 "clock format - bad time" {
list [catch {clock format foo} msg] $msg
diff --git a/tests/http.test b/tests/http.test
index cd61b7b..f7bb723 100644
--- a/tests/http.test
+++ b/tests/http.test
@@ -759,7 +759,7 @@ test http-idna-1.1.$ThreadLevel {IDNA package: basics} -returnCodes error -body
} -result {wrong # args: should be "::tcl::idna subcommand ?arg ...?"}
test http-idna-1.2.$ThreadLevel {IDNA package: basics} -returnCodes error -body {
::tcl::idna ?
-} -result {unknown subcommand "?": must be decode, encode, puny, or version}
+} -result {unknown or ambiguous subcommand "?": must be decode, encode, puny, or version}
test http-idna-1.3.$ThreadLevel {IDNA package: basics} -body {
::tcl::idna version
} -result 1.0.1
@@ -771,7 +771,7 @@ test http-idna-1.5.$ThreadLevel {IDNA package: basics} -returnCodes error -body
} -result {wrong # args: should be "::tcl::idna puny subcommand ?arg ...?"}
test http-idna-1.6.$ThreadLevel {IDNA package: basics} -returnCodes error -body {
::tcl::idna puny ?
-} -result {unknown subcommand "?": must be decode, or encode}
+} -result {unknown or ambiguous subcommand "?": must be decode, or encode}
test http-idna-1.7.$ThreadLevel {IDNA package: basics} -returnCodes error -body {
::tcl::idna puny encode
} -result {wrong # args: should be "::tcl::idna puny encode string ?case?"}