diff options
| author | dgp <dgp@noemail.net> | 2002-08-05 14:01:14 (GMT) |
|---|---|---|
| committer | dgp <dgp@noemail.net> | 2002-08-05 14:01:14 (GMT) |
| commit | dfc4f3e94772bd65622f333b1ad9836d20661205 (patch) | |
| tree | 704ba07b279aefe0d6cf85cc0ac6642f333fc350 /win | |
| parent | 2ad35b1f85c0b9aebda5d00fdb5a4507b8bc6e69 (diff) | |
| download | tk-dfc4f3e94772bd65622f333b1ad9836d20661205.zip tk-dfc4f3e94772bd65622f333b1ad9836d20661205.tar.gz tk-dfc4f3e94772bd65622f333b1ad9836d20661205.tar.bz2 | |
* win/tkWinFont.c: Additional changes to fix CONST warnings on
* win/tkWinWM.c: Windows due to latest patch. Tks Vince Darley.
FossilOrigin-Name: b4beb44ec364b878092bb55f550dd0389efba45d
Diffstat (limited to 'win')
| -rw-r--r-- | win/tkWinFont.c | 4 | ||||
| -rw-r--r-- | win/tkWinWm.c | 10 |
2 files changed, 7 insertions, 7 deletions
diff --git a/win/tkWinFont.c b/win/tkWinFont.c index c6111c8..87a7e82 100644 --- a/win/tkWinFont.c +++ b/win/tkWinFont.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: tkWinFont.c,v 1.15 2002/04/12 07:18:49 hobbs Exp $ + * RCS: @(#) $Id: tkWinFont.c,v 1.16 2002/08/05 14:01:15 dgp Exp $ */ #include "tkWinInt.h" @@ -352,7 +352,7 @@ TkpGetFontFromAttributes( Window window; WinFont *fontPtr; char ***fontFallbacks; - char *faceName, *fallback, *actualName; + Tk_Uid faceName, fallback, actualName; tkwin = (Tk_Window) ((TkWindow *) tkwin)->mainPtr->winPtr; window = Tk_WindowId(tkwin); diff --git a/win/tkWinWm.c b/win/tkWinWm.c index c2e56ff..22996e9 100644 --- a/win/tkWinWm.c +++ b/win/tkWinWm.c @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWinWm.c,v 1.50 2002/07/25 21:35:22 pspjuth Exp $ + * RCS: @(#) $Id: tkWinWm.c,v 1.51 2002/08/05 14:01:15 dgp Exp $ */ #include "tkWinInt.h" @@ -3387,7 +3387,7 @@ WmIconbitmapCmd(tkwin, winPtr, interp, objc, objv) } else if (objc == 3) { /* No arguments were given */ if (wmPtr->hints.flags & IconPixmapHint) { - Tcl_SetResult(interp, + Tcl_SetResult(interp, (char *) Tk_NameOfBitmap(winPtr->display, wmPtr->hints.icon_pixmap), TCL_STATIC); } @@ -3556,7 +3556,7 @@ WmIconmaskCmd(tkwin, winPtr, interp, objc, objv) } if (objc == 3) { if (wmPtr->hints.flags & IconMaskHint) { - Tcl_SetResult(interp, + Tcl_SetResult(interp, (char *) Tk_NameOfBitmap(winPtr->display, wmPtr->hints.icon_mask), TCL_STATIC); } @@ -4503,7 +4503,7 @@ WmTitleCmd(tkwin, winPtr, interp, objc, objv) return TCL_ERROR; } if (objc == 3) { - Tcl_SetResult(interp, + Tcl_SetResult(interp, (char *) ((wmPtr->title != NULL) ? wmPtr->title : winPtr->nameUid), TCL_STATIC); return TCL_OK; @@ -5609,7 +5609,7 @@ TkWmProtocolEventProc(winPtr, eventPtr) * Cache atom name, as we might destroy the window as a * result of the eval. */ - char *name = Tk_GetAtomName((Tk_Window) winPtr, protocol); + CONST char *name = Tk_GetAtomName((Tk_Window) winPtr, protocol); Tcl_Preserve((ClientData) protPtr); interp = protPtr->interp; |