Mercurial > hg > xemacs-beta
diff src/event-Xt.c @ 149:538048ae2ab8 r20-3b1
Import from CVS: tag r20-3b1
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:36:16 +0200 |
parents | 6608ceec7cf8 |
children | 25f70ba0133c |
line wrap: on
line diff
--- a/src/event-Xt.c Mon Aug 13 09:35:15 2007 +0200 +++ b/src/event-Xt.c Mon Aug 13 09:36:16 2007 +0200 @@ -2159,16 +2159,16 @@ Bool *critical = (Bool *) data; Lisp_Object keysym; - if (critical) *critical = False; - if (event->type != KeyPress) return 0; - if (! x_any_window_to_frame (d, event->xany.window)) return 0; - if (event->xkey.state - & (xd->MetaMask | xd->HyperMask | xd->SuperMask | xd->AltMask)) + if (critical) + *critical = False; + if ((event->type != KeyPress) || + (! x_any_window_to_frame (d, event->xany.window)) || + (event->xkey.state + & (xd->MetaMask | xd->HyperMask | xd->SuperMask | xd->AltMask))) return 0; /* This duplicates some code that exists elsewhere, but it's relatively - fast and doesn't cons. - */ + fast and doesn't cons. */ keysym = x_to_emacs_keysym (&event->xkey, 1); if (NILP (keysym)) return 0; if (CHAR_OR_CHAR_INTP (keysym)) @@ -2331,7 +2331,7 @@ #endif /* This function used to simply check whether there were any X - events (or is user_p was 1, it iterated over all the pending + events (or if user_p was 1, it iterated over all the pending X events using XCheckIfEvent(), looking for keystrokes and button events). That worked in the old cheesoid event loop, which didn't go through XtAppDispatchEvent(), but it doesn't