diff options
author | dgp <dgp@users.sourceforge.net> | 2004-11-18 19:22:07 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2004-11-18 19:22:07 (GMT) |
commit | 4e5e1d3ec698a9eb79f0201885584f3f8d233d35 (patch) | |
tree | b799cc820fa33ab33c4d999c17c6882513c0865e /generic | |
parent | 3727bd7f9afd5d6505ad727831ed2afc3723c316 (diff) | |
download | tcl-4e5e1d3ec698a9eb79f0201885584f3f8d233d35.zip tcl-4e5e1d3ec698a9eb79f0201885584f3f8d233d35.tar.gz tcl-4e5e1d3ec698a9eb79f0201885584f3f8d233d35.tar.bz2 |
* tests/basic.test: Updated functional (not testing) uses of
* tests/io.test: [bgerror] to make use of [interp bgerror].
* tests/socket.test:
* tests/timer.test:
* generic/tclInterp.c: Corrected [interp bgerror] error message.
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclInterp.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInterp.c b/generic/tclInterp.c index e0e3582..8f968ba 100644 --- a/generic/tclInterp.c +++ b/generic/tclInterp.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclInterp.c,v 1.49 2004/11/13 00:19:09 dgp Exp $ + * RCS: @(#) $Id: tclInterp.c,v 1.50 2004/11/18 19:22:12 dgp Exp $ */ #include "tclInt.h" @@ -624,7 +624,7 @@ Tcl_InterpObjCmd(clientData, interp, objc, objv) Tcl_Interp *slaveInterp; if (objc != 3 && objc != 4) { - Tcl_WrongNumArgs(interp, 2, objv, "path ?newlimit?"); + Tcl_WrongNumArgs(interp, 2, objv, "path ?cmdPrefix?"); return TCL_ERROR; } slaveInterp = GetInterp(interp, objv[2]); |