(modify_event_symbol): Add properly to *symbol_table.

4205cb08 · Richard M. Stallman · e1775344 · 4205cb08
Commit 4205cb08 authored Jun 27, 1996 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

src/keyboard.c src/keyboard.c +1 -1

No files found.
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -4485,7 +4485,7 @@ modify_event_symbol (symbol_num, modifiers, symbol_kind, name_alist,
 	}

      if (CONSP (*symbol_table))
-	*symbol_table = Fcons (value, *symbol_table);
+        *symbol_table = Fcons (Fcons (symbol_int, value), *symbol_table);
      else
 	XVECTOR (*symbol_table)->contents[symbol_num] = value;