head	1.2;
access;
symbols
	RELEASE_8_3_0:1.1
	RELEASE_9_0_0:1.1
	RELEASE_7_4_0:1.1
	RELEASE_8_2_0:1.1
	RELEASE_6_EOL:1.1
	RELEASE_8_1_0:1.1
	RELEASE_7_3_0:1.1
	RELEASE_8_0_0:1.1
	RELEASE_7_2_0:1.1
	RELEASE_7_1_0:1.1
	RELEASE_6_4_0:1.1
	RELEASE_5_EOL:1.1
	RELEASE_7_0_0:1.1
	RELEASE_6_3_0:1.1
	PRE_XORG_7:1.1
	RELEASE_4_EOL:1.1
	RELEASE_6_2_0:1.1
	RELEASE_6_1_0:1.1
	RELEASE_5_5_0:1.1
	RELEASE_6_0_0:1.1
	RELEASE_5_4_0:1.1
	RELEASE_4_11_0:1.1
	RELEASE_5_3_0:1.1
	RELEASE_4_10_0:1.1
	RELEASE_5_2_1:1.1
	RELEASE_5_2_0:1.1
	RELEASE_4_9_0:1.1
	RELEASE_5_1_0:1.1
	RELEASE_4_8_0:1.1
	RELEASE_5_0_0:1.1
	RELEASE_4_7_0:1.1
	RELEASE_4_6_2:1.1
	RELEASE_4_6_1:1.1
	RELEASE_4_6_0:1.1
	RELEASE_5_0_DP1:1.1
	RELEASE_4_5_0:1.1
	RELEASE_4_4_0:1.1
	RELEASE_4_3_0:1.1;
locks; strict;
comment	@# @;


1.2
date	2012.06.11.01.46.34;	author kevlo;	state dead;
branches;
next	1.1;

1.1
date	2001.02.22.04.09.59;	author kevlo;	state Exp;
branches;
next	;


desc
@@


1.2
log
@Remove obsolete ports
@
text
@--- ../generic/tkEvent.c.orig	Thu Dec 16 21:57:36 1999
+++ ../generic/tkEvent.c	Wed Feb 21 23:18:43 2001
@@@@ -663,6 +663,17 @@@@
     }
 
 #ifdef TK_USE_INPUT_METHODS
+#ifdef I18N_IMPROVE
+      /*
+       * No need to create an input context for each and every window.
+       *
+       * Futhermore, XFilterEvent() should be called just after the
+       * event is fetched, since some IM server have protocol bugs that
+       * causes Tk freezing, so events EXCEPT THE INPUT METHODS THINGS
+       * should only be queued into Tcl event queue.
+       *
+       */
+#else
     /*
      * Pass the event to the input method(s), if there are any, and
      * discard the event if the input method(s) insist.  Create the
@@@@ -684,6 +695,7 @@@@
 	    goto done;
 	}
     }
+#endif /* I18N_IMPROVE */
 #endif /* TK_USE_INPUT_METHODS */
 
     /*
@@@@ -936,6 +948,18 @@@@
 	    break;
 	}
     }
+
+#if defined(TK_USE_INPUT_METHODS) && defined(I18N_IMPROVE)
+    if (eventPtr->type == KeyPress && eventPtr->xkey.keycode == 0) {
+        /*
+         * No doubt this is a composed message from IM server.
+         * Tk can handle KeyPress event with zero keycode value 
+         * if state of the event is zero.
+         */
+        eventPtr->xkey.state = 0;
+	dispPtr->isComposed = 1;
+    }
+#endif /* TK_USE_INPUT_METHODS && I18N_IMPROVE */
 
     if ((dispPtr->delayedMotionPtr != NULL) && (position == TCL_QUEUE_TAIL)) {
 	if ((eventPtr->type == MotionNotify) && (eventPtr->xmotion.window
@


1.1
log
@Chineselized Tk ver. 8.3.0. This version is i18n improvement.

This changes the behavior of Tk on X where X Input Methods (XIM) were
recognized and used without question.
With 8.3, they will be recognized and initialized, but not used unless
XIM is turned on (tk useinputmethods 1).  This should only affect users
users with special input methods, and the new default behavior should
be more beneficial to the average user.

Please repo copy, thanks.
@
text
@@

