summaryrefslogtreecommitdiffstats
path: root/tests/tm.test
diff options
context:
space:
mode:
authornijtmans <nijtmans>2008-07-19 22:50:38 (GMT)
committernijtmans <nijtmans>2008-07-19 22:50:38 (GMT)
commit421f74b6e684727db193b1b1fc1e3a9649f86f58 (patch)
treec042d36466266a5022288e3db7d8d9a7dc6e81be /tests/tm.test
parent9c9a7764a3a00160ff48011547624ecf659a3dc9 (diff)
downloadtcl-421f74b6e684727db193b1b1fc1e3a9649f86f58.zip
tcl-421f74b6e684727db193b1b1fc1e3a9649f86f58.tar.gz
tcl-421f74b6e684727db193b1b1fc1e3a9649f86f58.tar.bz2
fix [2021443] inconsistant "wrong # args" messages
Diffstat (limited to 'tests/tm.test')
-rw-r--r--tests/tm.test6
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/tm.test b/tests/tm.test
index 3484747..d2f88a2 100644
--- a/tests/tm.test
+++ b/tests/tm.test
@@ -6,7 +6,7 @@
# Copyright (c) 2004 by Donal K. Fellows.
# All rights reserved.
#
-# RCS: @(#) $Id: tm.test,v 1.6 2005/08/29 21:55:27 andreas_kupries Exp $
+# RCS: @(#) $Id: tm.test,v 1.7 2008/07/19 22:50:39 nijtmans Exp $
package require Tcl 8.5
if {"::tcltest" ni [namespace children]} {
@@ -23,10 +23,10 @@ test tm-1.2 {tm: path command syntax} -returnCodes error -body {
} -result {unknown or ambiguous subcommand "foo": must be add, list, or remove}
test tm-1.3 {tm: path command syntax} -returnCodes error -body {
::tcl::tm::path add
-} -result "wrong # args: should be \"::tcl::tm::path add path ...\""
+} -result "wrong # args: should be \"::tcl::tm::path add path ?arg ...?\""
test tm-1.4 {tm: path command syntax} -returnCodes error -body {
::tcl::tm::path remove
-} -result "wrong # args: should be \"::tcl::tm::path remove path ...\""
+} -result "wrong # args: should be \"::tcl::tm::path remove path ?arg ...?\""
test tm-1.5 {tm: path command syntax} -returnCodes error -body {
::tcl::tm::path list foobar
} -result "wrong # args: should be \"::tcl::tm::path list\""