From af570109241e78092cb2e80486e479b3a71524ef Mon Sep 17 00:00:00 2001 From: Kevin B Kenny Date: Sat, 15 Feb 2003 22:30:29 +0000 Subject: Corrected a couple of typos in error messages. [Bug 596027] --- ChangeLog | 5 ++++- unix/tclUnixTest.c | 6 +++--- 2 files changed, 7 insertions(+), 4 deletions(-) diff --git a/ChangeLog b/ChangeLog index 9f0f949..b8d0cba 100644 --- a/ChangeLog +++ b/ChangeLog @@ -8,7 +8,10 @@ queue. Added test code in 'tcltest' and a new file of test cases 'notify.test' to exercise this functionality; several of the new test cases fail for the original code and pass for the corrected - code. + code. [Bug 673714] + + * unix/tclUnixTest.c (TestfilehandlerCmd): Corrected a couple + of typos in error messages. [Bug 596027] 2003-02-14 Jeff Hobbs 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; } -- cgit v0.12