diff options
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | generic/tkVisual.c | 8 |
2 files changed, 8 insertions, 4 deletions
@@ -1,3 +1,7 @@ +2004-05-23 Donal K. Fellows <donal.k.fellows@man.ac.uk> + + * generic/tkVisual.c (Tk_GetVisual): Minor fix for error message. + 2004-05-14 Donal K. Fellows <donal.k.fellows@man.ac.uk> * library/msgbox.tcl (MessageBox): Added TIP#152's -detail option diff --git a/generic/tkVisual.c b/generic/tkVisual.c index d7e85b4..9f81693 100644 --- a/generic/tkVisual.c +++ b/generic/tkVisual.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkVisual.c,v 1.5 2004/01/13 02:06:01 davygrvy Exp $ + * RCS: @(#) $Id: tkVisual.c,v 1.6 2004/05/23 17:27:55 dkf Exp $ */ #include "tkInt.h" @@ -175,12 +175,12 @@ Tk_GetVisual(interp, tkwin, string, depthPtr, colormapPtr) int visualId; /* - * This is a visual ID. - */ + * This is a visual ID. + */ if (Tcl_GetInt(interp, string, &visualId) == TCL_ERROR) { Tcl_ResetResult(interp); - Tcl_AppendResult(interp, "bad X identifier for visual: ", + Tcl_AppendResult(interp, "bad X identifier for visual: \"", string, "\"", (char *) NULL); return NULL; } |