diff options
| author | rmax <rmax@noemail.net> | 2005-12-05 17:02:00 (GMT) |
|---|---|---|
| committer | rmax <rmax@noemail.net> | 2005-12-05 17:02:00 (GMT) |
| commit | 76474e7d1682528d038240f38e9d98c495b91add (patch) | |
| tree | 16b942623c898b58fece56aa6f0ce18962b9c7bc | |
| parent | c49ab5a74f612529b5e04fc7d361eb2551ae6815 (diff) | |
| download | tk-76474e7d1682528d038240f38e9d98c495b91add.zip tk-76474e7d1682528d038240f38e9d98c495b91add.tar.gz tk-76474e7d1682528d038240f38e9d98c495b91add.tar.bz2 | |
* unix/tkUnixEvent.c (OpenIM): Added a workaround to allow at
least ASCII and the Compose key when typing into text and entry
widgets on a system that uses SCIM. This has to be taken out again
once the SCIM problems have been fixed.
FossilOrigin-Name: c35ecf2e63d2d84d618e4a73f48ddc1e7d6579ef
| -rw-r--r-- | ChangeLog | 7 | ||||
| -rw-r--r-- | unix/tkUnixEvent.c | 25 |
2 files changed, 30 insertions, 2 deletions
@@ -1,3 +1,10 @@ +2005-12-05 Reinhard Max <max@suse.de> + + * unix/tkUnixEvent.c (OpenIM): Added a workaround to allow at + least ASCII and the Compose key when typing into text and entry + widgets on a system that uses SCIM. This has to be taken out again + once the SCIM problems have been fixed. + 2005-12-01 Daniel Steffen <das@users.sourceforge.net> * unix/tcl.m4 (Darwin): fixed error when MACOSX_DEPLOYMENT_TARGET unset diff --git a/unix/tkUnixEvent.c b/unix/tkUnixEvent.c index 1ce015c..463db3a 100644 --- a/unix/tkUnixEvent.c +++ b/unix/tkUnixEvent.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: tkUnixEvent.c,v 1.17 2005/11/13 21:00:17 dkf Exp $ + * RCS: @(#) $Id: tkUnixEvent.c,v 1.18 2005/12/05 17:02:02 rmax Exp $ */ #include "tkInt.h" @@ -636,10 +636,31 @@ OpenIM( { unsigned short i; XIMStyles *stylePtr; + char *modifiers; - if (XSetLocaleModifiers("") == NULL) { + modifiers = XSetLocaleModifiers(""); + if (modifiers == NULL) { goto error; } +#if 1 + /* + * This is a temporary hack that can be taken back out again + * once Tk has learned how to deal with SCIM + */ + while ((modifiers = strchr(modifiers, '@')) != NULL) { + if (strncmp(modifiers, "@im=", 4) == 0) { + /* The first "@im=" entry wins */ + const char const *scim = "@im=SCIM"; + if (strncmp(modifiers, scim, strlen(scim)) == 0) { + /* If it is SCIM, we override it */ + if (XSetLocaleModifiers("@im=local") == NULL) { + goto error; + } + } + break; + } + } +#endif dispPtr->inputMethod = XOpenIM(dispPtr->display, NULL, NULL, NULL); if (dispPtr->inputMethod == NULL) { |