Latin-3 XKeysyms

Latin-3 XKeysyms

[Marko Rauhamaa]

After many years of frustration I finally took the bull by the horns and
figured out why emacs 21.3 still ignores Latin-3 XKeysyms like
XK_Ccircumflex. In fact, here's a simple patch that fixes the problem:

========================================================================
--- src/keyboard.c.bak	2003-11-10 23:30:13.000000000 -0800
+++ src/keyboard.c	2003-11-10 23:29:52.000000000 -0800
@@ -4670,6 +4670,12 @@
       /* A function key.  The symbol may need to have modifier prefixes
 	 tacked onto it.  */
     case non_ascii_keystroke:
+      if (event->code >= 0x200 && event->code < 0x300) {
+        Lisp_Object lispy_c;
+
+        XSETFASTINT (lispy_c, event->code + 0x700);
+        return lispy_c;
+      }
       button_down_time = 0;
 
       for (i = 0; i < sizeof (lispy_accent_codes) / sizeof (int); i++)
========================================================================

(I hearby donate the patch to the FSF. I created it on my own computer
in my home in California, where slave contracts are not enforceable. I
certify that no other party can possibly have any claim to the patch. In
fact, since those lines are an almost verbatim copy of a few lines
above, I shouldn't have any claim to it to begin with.)


Marko

-- 
Marko Rauhamaa      mailto:marko@pacujo.net     http://pacujo.net/marko/

Re: Latin-3 XKeysyms

[Stefan Monnier]

> After many years of frustration I finally took the bull by the horns and
> figured out why emacs 21.3 still ignores Latin-3 XKeysyms like
> XK_Ccircumflex. In fact, here's a simple patch that fixes the problem:

> ========================================================================
> --- src/keyboard.c.bak	2003-11-10 23:30:13.000000000 -0800
> +++ src/keyboard.c	2003-11-10 23:29:52.000000000 -0800
> @@ -4670,6 +4670,12 @@
>        /* A function key.  The symbol may need to have modifier prefixes
>  	 tacked onto it.  */
>      case non_ascii_keystroke:
> +      if (event->code >= 0x200 && event->code < 0x300) {
> +        Lisp_Object lispy_c;
> +
> +        XSETFASTINT (lispy_c, event->code + 0x700);
> +        return lispy_c;
> +      }
>        button_down_time = 0;
 
>        for (i = 0; i < sizeof (lispy_accent_codes) / sizeof (int); i++)
> ========================================================================

This part of the code was changed in Emacs-CVS.  Could you check that
Emacs-CVS still suffers from your problem and that your patch still
fixes it ?


        Stefan