diff options
| author | mdejong <mdejong> | 2003-01-14 01:20:54 (GMT) |
|---|---|---|
| committer | mdejong <mdejong> | 2003-01-14 01:20:54 (GMT) |
| commit | 5ae8904c94d71fcc6507eb85784490ddd6a348cd (patch) | |
| tree | bf379f02ef8cd7f40f5ace630d67f56d7e0ea556 /win/tkWinDialog.c | |
| parent | 24b85561272fc278646565a3a360142b28c05616 (diff) | |
| download | tk-5ae8904c94d71fcc6507eb85784490ddd6a348cd.zip tk-5ae8904c94d71fcc6507eb85784490ddd6a348cd.tar.gz tk-5ae8904c94d71fcc6507eb85784490ddd6a348cd.tar.bz2 | |
* win/tkWinDialog.c (Tk_ChooseDirectoryObjCmd,
ChooseDirectoryValidateProc, Tk_MessageBoxObjCmd):
Remove unused tsdPtr variable. Use TEXT macro
instead of _T macro since _T does not work
under Cygwin. Declare flags as UINT to avoid
compiler warning when compiling with mingw.
Diffstat (limited to 'win/tkWinDialog.c')
| -rw-r--r-- | win/tkWinDialog.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/win/tkWinDialog.c b/win/tkWinDialog.c index eb3bd42..327d0ad 100644 --- a/win/tkWinDialog.c +++ b/win/tkWinDialog.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWinDialog.c,v 1.29 2002/08/14 15:31:21 vincentdarley Exp $ + * RCS: @(#) $Id: tkWinDialog.c,v 1.30 2003/01/14 01:20:55 mdejong Exp $ * */ @@ -1666,8 +1666,6 @@ Tk_ChooseDirectoryObjCmd(clientData, interp, objc, objv) TCHAR saveDir[MAX_PATH]; Tcl_DString titleString; /* UTF Title */ Tcl_DString initDirString; /* Initial directory */ - ThreadSpecificData *tsdPtr = (ThreadSpecificData *) - Tcl_GetThreadData(&dataKey, sizeof(ThreadSpecificData)); static CONST char *optionStrings[] = { "-initialdir", "-mustexist", "-parent", "-title", (char *) NULL }; @@ -1915,7 +1913,7 @@ ChooseDirectoryValidateProc ( /* * User HAS to select a valid directory. */ - wsprintf(selDir, _T("Directory '%.200s' does not exist,\nplease select or enter an existing directory."), chooseDirSharedData->utfRetDir); + wsprintf(selDir, TEXT("Directory '%.200s' does not exist,\nplease select or enter an existing directory."), chooseDirSharedData->utfRetDir); MessageBox(NULL, selDir, NULL, MB_ICONEXCLAMATION|MB_OK); return 1; } @@ -2444,7 +2442,8 @@ Tk_MessageBoxObjCmd(clientData, interp, objc, objv) HWND hWnd; char *message, *title; int defaultBtn, icon, type; - int i, oldMode, flags, winCode; + int i, oldMode, winCode; + UINT flags; Tcl_DString messageString, titleString; Tcl_Encoding unicodeEncoding = TkWinGetUnicodeEncoding(); static CONST char *optionStrings[] = { |