diff options
| author | vincentdarley <vincentdarley> | 2002-07-18 23:45:18 (GMT) |
|---|---|---|
| committer | vincentdarley <vincentdarley> | 2002-07-18 23:45:18 (GMT) |
| commit | 235b71b841c362bc965ce1de8d8cb30e17a281b5 (patch) | |
| tree | 68074bc6c225ae7e6a8c3083045ef9218e160119 /macosx/tkMacOSXKeyboard.c | |
| parent | b027a144a0fc7c96a3af713e8c0fd34dca0bdfd5 (diff) | |
| download | tk-235b71b841c362bc965ce1de8d8cb30e17a281b5.zip tk-235b71b841c362bc965ce1de8d8cb30e17a281b5.tar.gz tk-235b71b841c362bc965ce1de8d8cb30e17a281b5.tar.bz2 | |
encodings, events
Diffstat (limited to 'macosx/tkMacOSXKeyboard.c')
| -rw-r--r-- | macosx/tkMacOSXKeyboard.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/macosx/tkMacOSXKeyboard.c b/macosx/tkMacOSXKeyboard.c index 77de380..fc6baa6 100644 --- a/macosx/tkMacOSXKeyboard.c +++ b/macosx/tkMacOSXKeyboard.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkMacOSXKeyboard.c,v 1.1.2.1 2001/10/15 09:22:00 wolfsuit Exp $ + * RCS: @(#) $Id: tkMacOSXKeyboard.c,v 1.1.2.2 2002/07/18 23:45:18 vincentdarley Exp $ */ #include "tkInt.h" @@ -17,6 +17,8 @@ #include "X11/keysym.h" #include <Carbon/Carbon.h> +extern Tcl_Encoding macRomanEncoding; + typedef struct { short keycode; /* Macintosh keycode */ KeySym keysym; /* X windows Keysym */ @@ -247,7 +249,7 @@ TkpGetString( len = 0; } } - return Tcl_ExternalToUtfDString(NULL, string, len, dsPtr); + return Tcl_ExternalToUtfDString(macRomanEncoding, string, len, dsPtr); } /* |