From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 19 Dec 1996 23:57:33 +0000 (+0000)
Subject: (modify_event_symbol):
X-Git-Tag: emacs-20.1~3210
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2ff6714dd12381a8b72cee0dc243a039bea70fed;p=emacs.git

(modify_event_symbol):
Don't index thru name_table if it is null.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index 625e14b9247..886857702e0 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -4463,7 +4463,7 @@ modify_event_symbol (symbol_num, modifiers, symbol_kind, name_alist,
       /* No; let's create it.  */
       if (!NILP (name_alist))
 	value = Fcdr_safe (Fassq (symbol_int, name_alist));
-      else if (name_table[symbol_num])
+      else if (name_table != 0 && name_table[symbol_num])
 	value = intern (name_table[symbol_num]);
 
 #ifdef HAVE_WINDOW_SYSTEM