diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-04 22:04:34 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-04 22:04:34 (GMT) |
commit | 27e0b947919e8dd662804a6527b5d606ec32c0ce (patch) | |
tree | 0a6b71aef3ce111c05228bb29764bb2beb84b96e /generic/tkMain.c | |
parent | 7a46c93cc59be36e92a322db13ab911e48cea498 (diff) | |
download | tk-27e0b947919e8dd662804a6527b5d606ec32c0ce.zip tk-27e0b947919e8dd662804a6527b5d606ec32c0ce.tar.gz tk-27e0b947919e8dd662804a6527b5d606ec32c0ce.tar.bz2 |
unneeded TEXT macro
Diffstat (limited to 'generic/tkMain.c')
-rw-r--r-- | generic/tkMain.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tkMain.c b/generic/tkMain.c index 2464125..190635f 100644 --- a/generic/tkMain.c +++ b/generic/tkMain.c @@ -258,20 +258,20 @@ Tk_MainEx( /* mind argc is being adjusted as we proceed */ if ((argc >= 3) && (0 == _tcscmp(TEXT("-encoding"), argv[1])) - && (TEXT('-') != argv[3][0])) { + && ('-' != argv[3][0])) { Tcl_Obj *value = NewNativeObj(argv[2]); Tcl_SetStartupScript(NewNativeObj(argv[3]), Tcl_GetString(value)); Tcl_DecrRefCount(value); argc -= 3; i += 3; - } else if ((argc >= 1) && (TEXT('-') != argv[1][0])) { + } else if ((argc >= 1) && ('-' != argv[1][0])) { Tcl_SetStartupScript(NewNativeObj(argv[1]), NULL); argc--; i++; } else if ((argc >= 2) && (length = _tcslen(argv[1])) && (length > 1) && (0 == _tcsncmp(TEXT("-file"), argv[1], length)) - && (TEXT('-') != argv[2][0])) { + && ('-' != argv[2][0])) { Tcl_SetStartupScript(NewNativeObj(argv[2]), NULL); argc -= 2; i += 2; |