Index: Tk/generic/tkBind.c
*** 3.99.5.3/Tk/generic/tkBind.c Wed, 30 Sep 1998 14:02:29 +0200 eg (STk/Z/50_tkBind.c 1.6 644)
--- 3.99.5.3(w)/Tk/generic/tkBind.c Thu, 11 Mar 1999 19:06:41 +0100 eg (STk/Z/50_tkBind.c 1.6 644)
***************
*** 2572,2577 ****
--- 2572,2583 ----
  	  Tcl_DStringAppend(dsPtr, numStorage, -1);
  	  before += 1;
  	}
+ 	/* skip the characters after the first character of the 
+ 	 * variable name (i.e. only the fisrta character is significant 
+ 	 * This is not pretty but we cannot do much here since this 
+ 	 * is void function.
+ 	 */
+ 	while (*before && *before != ' ' && *before !=')') before++;	  
  #else
  	doNumber:
  	sprintf(numStorage, "%d", number);