summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2009-11-16 18:01:49 (GMT)
committerdgp <dgp@users.sourceforge.net>2009-11-16 18:01:49 (GMT)
commitdce1b940f545bb8797289e11aed2715451c71396 (patch)
tree04b73728742644ac768f1097e3cdceb53c863b96 /generic
parentbce1984cd71b25499760b589bfe695ffb6213d83 (diff)
downloadtcl-dce1b940f545bb8797289e11aed2715451c71396.zip
tcl-dce1b940f545bb8797289e11aed2715451c71396.tar.gz
tcl-dce1b940f545bb8797289e11aed2715451c71396.tar.bz2
Use proper command creation routine.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclTest.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c
index cdaa440..b089065 100644
--- a/generic/tclTest.c
+++ b/generic/tclTest.c
@@ -14,7 +14,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclTest.c,v 1.137 2009/11/16 17:38:09 ferrieux Exp $
+ * RCS: @(#) $Id: tclTest.c,v 1.138 2009/11/16 18:01:49 dgp Exp $
*/
#define TCL_TEST
@@ -622,7 +622,7 @@ Tcltest_Init(
Tcl_CreateObjCommand(interp, "testlocale", TestlocaleCmd, (ClientData) 0,
NULL);
Tcl_CreateCommand(interp, "testpanic", TestpanicCmd, (ClientData) 0, NULL);
- Tcl_CreateCommand(interp, "testfinexit", TestfinexitObjCmd, (ClientData) 0, NULL);
+ Tcl_CreateObjCommand(interp, "testfinexit", TestfinexitObjCmd, (ClientData) 0, NULL);
Tcl_CreateObjCommand(interp, "testparser", TestparserObjCmd,
(ClientData) 0, NULL);
Tcl_CreateObjCommand(interp, "testparsevar", TestparsevarObjCmd,