Since Uwe didn't actually want this and since there is no demonstrable need for this, I'm going to revert this patch unless someone generates a cogent argument in favor of the patch. Regards, Vin ---------- Forwarded message ---------- From: <commits-noreply(a)bitbucket.org&gt; Date: Fri, Apr 12, 2013 at 11:52 AM Subject: commit/xemacs-21.4: Vin Shelton: Apply Sean MacLennon's patch to recognize shifted function keys directly. To: xemacs-commits(a)xemacs.org 1 new commit in xemacs-21.4: https://bitbucket.org/xemacs/xemacs-21.4/commits/13d13fa19748/ Changeset: 13d13fa19748 User: Vin Shelton Date: 2013-04-12 17:34:28 Summary: Apply Sean MacLennon's patch to recognize shifted function keys directly. Affected #: 2 files diff -r 2ccd146e07e9e2554f1e759d1fddee2b5d6527d8 -r 13d13fa1974802424c254ff5e981d148f8163dcd src/ChangeLog --- a/src/ChangeLog +++ b/src/ChangeLog ＠＠ -1,3 +1,9 ＠＠ +2013-04-12 Vin Shelton <acs(a)xemacs.org&gt; + + * event-Xt.c (x_event_to_emacs_event): Allow XEmacs to recognize + shifted function keys directly. This is likely an XFree bug. + Patch by Sean MacLennan. + 2012-07-12 Vin Shelton <acs(a)xemacs.org&gt; * glyphs-eimage.c: Fix this so it compiles with libpng-1.5.10. diff -r 2ccd146e07e9e2554f1e759d1fddee2b5d6527d8 -r 13d13fa1974802424c254ff5e981d148f8163dcd src/event-Xt.c --- a/src/event-Xt.c +++ b/src/event-Xt.c ＠＠ -1260,7 +1260,25 ＠＠ KeySym bot = XLookupKeysym (ev, Mode_switch_p ? 2 : 0); KeySym top = XLookupKeysym (ev, Mode_switch_p ? 3 : 1); if (top && bot && top != bot) - modifiers &= ~XEMACS_MOD_SHIFT; + /* Look directly for shifted function keycodes */ + switch(top) { + case 0x1008fe01: + case 0x1008fe02: + case 0x1008fe03: + case 0x1008fe04: + case 0x1008fe05: + case 0x1008fe06: + case 0x1008fe07: + case 0x1008fe08: + case 0x1008fe09: + case 0x1008fe0a: + case 0x1008fe0b: + case 0x1008fe0c: + break; + default: + modifiers &= ~XEMACS_MOD_SHIFT; + break; + } } emacs_event->event_type = key_press_event; emacs_event->timestamp = ev->time; Repository URL: https://bitbucket.org/xemacs/xemacs-21.4/ -- This is a commit notification from bitbucket.org. You are receiving this because you have the service enabled, addressing the recipient of this email. _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-patches _______________________________________________ XEmacs-Beta mailing list XEmacs-Beta(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-beta