diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-28 11:24:03 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-01-28 11:24:03 (GMT) |
| commit | 389232d83af4ed09331f33a3eb217b28aa5b0d80 (patch) | |
| tree | 65123df923e2cd33f1a897da5b4a37c2e704270f /win/tkWinMenu.c | |
| parent | 0de9e7c313ad8508a10b915e34dd00c65618c794 (diff) | |
| download | tk-389232d83af4ed09331f33a3eb217b28aa5b0d80.zip tk-389232d83af4ed09331f33a3eb217b28aa5b0d80.tar.gz tk-389232d83af4ed09331f33a3eb217b28aa5b0d80.tar.bz2 | |
Convert all Tcl_SetResult calls to Tcl_SetObjResult calls.
Convert Tcl_GetStringFromObj to Tcl_GetString when possible.
Diffstat (limited to 'win/tkWinMenu.c')
| -rw-r--r-- | win/tkWinMenu.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/win/tkWinMenu.c b/win/tkWinMenu.c index 26f08f4..b7b5598 100644 --- a/win/tkWinMenu.c +++ b/win/tkWinMenu.c @@ -1948,7 +1948,7 @@ DrawMenuUnderline( if (mePtr->underline < len) { const char *label, *start, *end; - label = Tcl_GetStringFromObj(mePtr->labelPtr, NULL); + label = Tcl_GetString(mePtr->labelPtr); start = Tcl_UtfAtIndex(label, mePtr->underline); end = Tcl_UtfNext(start); Tk_UnderlineChars(menuPtr->display, d, |