diff options
Diffstat (limited to 'unix/tkUnixMenu.c')
| -rw-r--r-- | unix/tkUnixMenu.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tkUnixMenu.c b/unix/tkUnixMenu.c index 4ae343c..08d45b0 100644 --- a/unix/tkUnixMenu.c +++ b/unix/tkUnixMenu.c @@ -860,13 +860,13 @@ DrawMenuUnderline( if (mePtr->labelPtr != NULL) { int len; - len = Tcl_GetCharLength(mePtr->labelPtr); + len = TkGetCharLength(mePtr->labelPtr); if (mePtr->underline < len && mePtr->underline >= -len) { int activeBorderWidth, leftEdge, ch; const char *label, *start, *end; label = Tcl_GetString(mePtr->labelPtr); - start = Tcl_UtfAtIndex(label, (mePtr->underline < 0) ? mePtr->underline + len : mePtr->underline); + start = TkUtfAtIndex(label, (mePtr->underline < 0) ? mePtr->underline + len : mePtr->underline); end = start + TkUtfToUniChar(start, &ch); Tk_GetPixelsFromObj(NULL, menuPtr->tkwin, |