diff options
| author | kennykb <kennykb@noemail.net> | 2003-02-15 22:30:29 (GMT) |
|---|---|---|
| committer | kennykb <kennykb@noemail.net> | 2003-02-15 22:30:29 (GMT) |
| commit | edd2ca5b5830525bb4042431b2cfccf7d8398cca (patch) | |
| tree | 47932059140748b6551eb4b5516320b8d64885f1 /unix/tclUnixTest.c | |
| parent | 6a0e5b71c661df99cca87b93cd8e9ceb2ecdd695 (diff) | |
| download | tcl-edd2ca5b5830525bb4042431b2cfccf7d8398cca.zip tcl-edd2ca5b5830525bb4042431b2cfccf7d8398cca.tar.gz tcl-edd2ca5b5830525bb4042431b2cfccf7d8398cca.tar.bz2 | |
Corrected a couple of typos in error messages. [Bug 596027]
FossilOrigin-Name: aba2bc0454a5a661e3b981e5323a1538d0f45c8d
Diffstat (limited to 'unix/tclUnixTest.c')
| -rw-r--r-- | unix/tclUnixTest.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/tclUnixTest.c b/unix/tclUnixTest.c index 95adcd6..2b636b4 100644 --- a/unix/tclUnixTest.c +++ b/unix/tclUnixTest.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixTest.c,v 1.13 2002/08/20 03:03:54 andreas_kupries Exp $ + * RCS: @(#) $Id: tclUnixTest.c,v 1.14 2003/02/15 22:30:29 kennykb Exp $ */ #include "tclInt.h" @@ -274,7 +274,7 @@ TestfilehandlerCmd(clientData, interp, argc, argv) } else if (strcmp(argv[1], "fill") == 0) { if (argc != 3) { Tcl_AppendResult(interp, "wrong # arguments: should be \"", - argv[0], " empty index\"", (char *) NULL); + argv[0], " fill index\"", (char *) NULL); return TCL_ERROR; } @@ -287,7 +287,7 @@ TestfilehandlerCmd(clientData, interp, argc, argv) if (argc != 3) { Tcl_AppendResult(interp, "wrong # arguments: should be \"", - argv[0], " empty index\"", (char *) NULL); + argv[0], " fillpartial index\"", (char *) NULL); return TCL_ERROR; } |