From 79a7046ca7c50f4abd934a651e23351f2a4a1fa4 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Fri, 31 Dec 1993 17:29:12 +0000
Subject: [PATCH] (lispy_accent_codes): Cope if an XK symbol is undefined.
 (make_lispy_event): Define i.

---
 src/keyboard.c | 54 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 54 insertions(+)

diff --git a/src/keyboard.c b/src/keyboard.c
index 2b85c37d569..7dd56e90729 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -2122,19 +2122,71 @@ static Lisp_Object mouse_syms;
 
 static int lispy_accent_codes[] =
 {
+#ifdef XK_dead_circumflex
   XK_dead_circumflex,
+#else
+  0,
+#endif
+#ifdef XK_dead_grave
   XK_dead_grave,
+#else
+  0,
+#endif
+#ifdef XK_dead_tilde
   XK_dead_tilde,
+#else
+  0,
+#endif
+#ifdef XK_dead_diaeresis
   XK_dead_diaeresis,
+#else
+  0,
+#endif
+#ifdef XK_dead_macron
   XK_dead_macron,
+#else
+  0,
+#endif
+#ifdef XK_dead_degree
   XK_dead_degree,
+#else
+  0,
+#endif
+#ifdef XK_dead_acute
   XK_dead_acute,
+#else
+  0,
+#endif
+#ifdef XK_dead_cedilla
   XK_dead_cedilla,
+#else
+  0,
+#endif
+#ifdef XK_dead_breve
   XK_dead_breve,
+#else
+  0,
+#endif
+#ifdef XK_dead_ogonek
   XK_dead_ogonek,
+#else
+  0,
+#endif
+#ifdef XK_dead_caron
   XK_dead_caron,
+#else
+  0,
+#endif
+#ifdef XK_dead_doubleacute
   XK_dead_doubleacute,
+#else
+  0,
+#endif
+#ifdef XK_dead_abovedot
   XK_dead_abovedot,
+#else
+  0,
+#endif
 };
 
 /* This is a list of Lisp names for special "accent" characters.
@@ -2310,6 +2362,8 @@ static Lisp_Object
 make_lispy_event (event)
      struct input_event *event;
 {
+  int i;
+
 #ifdef SWITCH_ENUM_BUG
   switch ((int) event->kind)
 #else
-- 
2.39.5