diff options
| author | lfb <lfb@noemail.net> | 1999-02-16 11:39:28 (GMT) |
|---|---|---|
| committer | lfb <lfb@noemail.net> | 1999-02-16 11:39:28 (GMT) |
| commit | 09a811fadff937b785ea3a9721fa14b67b79a650 (patch) | |
| tree | 9e7dd19858149b6d83ef8f34dd2a5c9afdf60d61 /generic/tkTextTag.c | |
| parent | 540513c43292aff60a16a50741f8ae1d2027a36f (diff) | |
| download | tk-09a811fadff937b785ea3a9721fa14b67b79a650.zip tk-09a811fadff937b785ea3a9721fa14b67b79a650.tar.gz tk-09a811fadff937b785ea3a9721fa14b67b79a650.tar.bz2 | |
Eliminated last stronghold of static data in the Tk core...until the next one.
FossilOrigin-Name: 102db2bb412a5bf245b6f874ccc434753ac4ded5
Diffstat (limited to 'generic/tkTextTag.c')
| -rw-r--r-- | generic/tkTextTag.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkTextTag.c b/generic/tkTextTag.c index a1602b7..c7f1986 100644 --- a/generic/tkTextTag.c +++ b/generic/tkTextTag.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: tkTextTag.c,v 1.1.4.2 1998/09/30 02:17:26 stanton Exp $ + * RCS: @(#) $Id: tkTextTag.c,v 1.1.4.3 1999/02/16 11:39:33 lfb Exp $ */ #include "default.h" @@ -392,9 +392,9 @@ TkTextTagCmd(textPtr, interp, argc, argv) } } if ((tagPtr->wrapMode != NULL) - && (tagPtr->wrapMode != tkTextCharUid) - && (tagPtr->wrapMode != tkTextNoneUid) - && (tagPtr->wrapMode != tkTextWordUid)) { + && (tagPtr->wrapMode != Tk_GetUid("char")) + && (tagPtr->wrapMode != Tk_GetUid("none")) + && (tagPtr->wrapMode != Tk_GetUid("word"))) { Tcl_AppendResult(interp, "bad wrap mode \"", tagPtr->wrapMode, "\": must be char, none, or word", (char *) NULL); tagPtr->wrapMode = NULL; |