summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2006-02-09 16:53:29 (GMT)
committerdgp <dgp@users.sourceforge.net>2006-02-09 16:53:29 (GMT)
commitaf5c89aba29208e6298cd59900eb13feaac963c8 (patch)
treed9e30ff05a980766d59a42e885213c3458a6a4e9 /tests
parent26ed5a5a48d96cce3f3a29775e1528a71f9c9978 (diff)
downloadtcl-af5c89aba29208e6298cd59900eb13feaac963c8.zip
tcl-af5c89aba29208e6298cd59900eb13feaac963c8.tar.gz
tcl-af5c89aba29208e6298cd59900eb13feaac963c8.tar.bz2
dup test name
Diffstat (limited to 'tests')
-rw-r--r--tests/apply.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/apply.test b/tests/apply.test
index b9d41ec..9f619bf 100644
--- a/tests/apply.test
+++ b/tests/apply.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: apply.test,v 1.3 2006/02/09 16:42:55 dgp Exp $
+# RCS: @(#) $Id: apply.test,v 1.4 2006/02/09 16:53:29 dgp Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
package require tcltest
@@ -104,7 +104,7 @@ test apply-3.3 {non-existing namespace} {
list $res $msg
} {1 {cannot find namespace "::NONEXIST::FOR::SURE"}}
-test apply-3.3 {non-existing namespace} {
+test apply-3.4 {non-existing namespace} {
namespace eval ::NONEXIST::FOR::SURE {}
set lambda [list x {set x 1} NONEXIST::FOR::SURE]
apply $lambda x