Mercurial > hg > xemacs-beta

comparison src/event-Xt.c @ 367:a4f53d9b3154 r21-1-13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-13
author cvs
date Mon, 13 Aug 2007 11:01:07 +0200
parents 30d2cfa1092a
children cc15677e0335
comparison
equal deleted inserted replaced
366:83d76f480a59 367:a4f53d9b3154
770 { 770 {
771 KeySym keysym = 0; 771 KeySym keysym = 0;
772 772
773 #ifdef HAVE_XIM 773 #ifdef HAVE_XIM
774 int len; 774 int len;
775 char buffer[64]; 775 /* Some implementations of XmbLookupString don't return
776 XBufferOverflow correctly, so increase the size of the xim input
777 buffer from 64 to the more reasonable size 513, as Emacs has done.
778 From Kenichi Handa. */
779 char buffer[513];
776 char *bufptr = buffer; 780 char *bufptr = buffer;
777 int bufsiz = sizeof (buffer); 781 int bufsiz = sizeof (buffer);
778 Status status; 782 Status status;
779 #ifdef XIM_XLIB 783 #ifdef XIM_XLIB
780 XIC xic = FRAME_X_XIC (x_any_window_to_frame 784 XIC xic = FRAME_X_XIC (x_any_window_to_frame
1117 unsigned long size, dtype; 1121 unsigned long size, dtype;
1118 Lisp_Object l_type = Qnil, l_data = Qnil; 1122 Lisp_Object l_type = Qnil, l_data = Qnil;
1119 Lisp_Object l_dndlist = Qnil, l_item = Qnil; 1123 Lisp_Object l_dndlist = Qnil, l_item = Qnil;
1120 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4; 1124 struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
1121 1125
1122 GCPRO4 (l_type, l_data, l_dndlist, l_item);
1123
1124 if (! frame) 1126 if (! frame)
1125 return 0; /* not for us */ 1127 return 0; /* not for us */
1128
1129 GCPRO4 (l_type, l_data, l_dndlist, l_item);
1130
1126 XSETFRAME (emacs_event->channel, frame); 1131 XSETFRAME (emacs_event->channel, frame);
1127 1132
1128 emacs_event->event_type = misc_user_event; 1133 emacs_event->event_type = misc_user_event;
1129 emacs_event->timestamp = DEVICE_X_LAST_SERVER_TIMESTAMP (d); 1134 emacs_event->timestamp = DEVICE_X_LAST_SERVER_TIMESTAMP (d);
1130 1135