aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorJim Blandy1992-10-03 00:05:39 +0000
committerJim Blandy1992-10-03 00:05:39 +0000
commitcebd887d3a826a6c493f933ecf02b62df779750a (patch)
tree69beb6b41051efea997513304ae17046c09d825d /src
parentc1f6cc77a69159a0a9a8b14b057ec5bc9fa8eaa1 (diff)
downloademacs-cebd887d3a826a6c493f933ecf02b62df779750a.tar.gz
emacs-cebd887d3a826a6c493f933ecf02b62df779750a.zip
* keymap.c (access_keymap, store_in_keymap,
Fsingle_key_description): No need to check for EVENT_HAS_PARAMETERS before using EVENT_HEAD; the latter now works properly on all sorts of events.
Diffstat (limited to 'src')
-rw-r--r--src/keymap.c9
1 files changed, 3 insertions, 6 deletions
diff --git a/src/keymap.c b/src/keymap.c
index 22846bb7eff..069d6460c1c 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -215,8 +215,7 @@ access_keymap (map, idx)
215 /* If idx is a list (some sort of mouse click, perhaps?), 215 /* If idx is a list (some sort of mouse click, perhaps?),
216 the index we want to use is the car of the list, which 216 the index we want to use is the car of the list, which
217 ought to be a symbol. */ 217 ought to be a symbol. */
218 if (EVENT_HAS_PARAMETERS (idx)) 218 idx = EVENT_HEAD (idx);
219 idx = EVENT_HEAD (idx);
220 219
221 if (XTYPE (idx) == Lisp_Int 220 if (XTYPE (idx) == Lisp_Int
222 && (XINT (idx) < 0 || XINT (idx) >= DENSE_TABLE_SIZE)) 221 && (XINT (idx) < 0 || XINT (idx) >= DENSE_TABLE_SIZE))
@@ -312,8 +311,7 @@ store_in_keymap (keymap, idx, def)
312 /* If idx is a list (some sort of mouse click, perhaps?), 311 /* If idx is a list (some sort of mouse click, perhaps?),
313 the index we want to use is the car of the list, which 312 the index we want to use is the car of the list, which
314 ought to be a symbol. */ 313 ought to be a symbol. */
315 if (EVENT_HAS_PARAMETERS (idx)) 314 idx = EVENT_HEAD (idx);
316 idx = EVENT_HEAD (idx);
317 315
318 if (XTYPE (idx) == Lisp_Int 316 if (XTYPE (idx) == Lisp_Int
319 && (XINT (idx) < 0 || XINT (idx) >= DENSE_TABLE_SIZE)) 317 && (XINT (idx) < 0 || XINT (idx) >= DENSE_TABLE_SIZE))
@@ -1105,8 +1103,7 @@ Control characters turn into C-whatever, etc.")
1105 register unsigned char c; 1103 register unsigned char c;
1106 char tem[6]; 1104 char tem[6];
1107 1105
1108 if (EVENT_HAS_PARAMETERS (key)) 1106 key = EVENT_HEAD (key);
1109 key = EVENT_HEAD (key);
1110 1107
1111 switch (XTYPE (key)) 1108 switch (XTYPE (key))
1112 { 1109 {