Mercurial > emacs
changeset 3042:793f7e0dc66b
(modify_event_symbol): If a name_table elt is null,
generate a name to use. Don't crash.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 24 May 1993 22:58:54 +0000 |
parents | 200a7b012253 |
children | 29fe3ea604a2 |
files | src/keyboard.c |
diffstat | 1 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/keyboard.c Mon May 24 22:35:11 1993 +0000 +++ b/src/keyboard.c Mon May 24 22:58:54 1993 +0000 @@ -2739,7 +2739,14 @@ if (NILP (*slot)) { /* No; let's create it. */ - *slot = intern (name_table[symbol_num]); + if (name_table[symbol_num]) + *slot = intern (name_table[symbol_num]); + else + { + char buf[20]; + sprintf (buf, "key-%d", symbol_num); + *slot = intern (buf); + } /* Fill in the cache entries for this symbol; this also builds the Qevent_symbol_elements property, which the user