diff options
| author | Jim Blandy <jimb@redhat.com> | 1992-10-03 00:05:39 +0000 |
|---|---|---|
| committer | Jim Blandy <jimb@redhat.com> | 1992-10-03 00:05:39 +0000 |
| commit | cebd887d3a826a6c493f933ecf02b62df779750a (patch) | |
| tree | 69beb6b41051efea997513304ae17046c09d825d /src/keymap.c | |
| parent | c1f6cc77a69159a0a9a8b14b057ec5bc9fa8eaa1 (diff) | |
| download | emacs-cebd887d3a826a6c493f933ecf02b62df779750a.tar.gz | |
* 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/keymap.c')
| -rw-r--r-- | src/keymap.c | 9 |
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) /* If idx is a list (some sort of mouse click, perhaps?), the index we want to use is the car of the list, which ought to be a symbol. */ - if (EVENT_HAS_PARAMETERS (idx)) - idx = EVENT_HEAD (idx); + idx = EVENT_HEAD (idx); if (XTYPE (idx) == Lisp_Int && (XINT (idx) < 0 || XINT (idx) >= DENSE_TABLE_SIZE)) @@ -312,8 +311,7 @@ store_in_keymap (keymap, idx, def) /* If idx is a list (some sort of mouse click, perhaps?), the index we want to use is the car of the list, which ought to be a symbol. */ - if (EVENT_HAS_PARAMETERS (idx)) - idx = EVENT_HEAD (idx); + idx = EVENT_HEAD (idx); if (XTYPE (idx) == Lisp_Int && (XINT (idx) < 0 || XINT (idx) >= DENSE_TABLE_SIZE)) @@ -1105,8 +1103,7 @@ Control characters turn into C-whatever, etc.") register unsigned char c; char tem[6]; - if (EVENT_HAS_PARAMETERS (key)) - key = EVENT_HEAD (key); + key = EVENT_HEAD (key); switch (XTYPE (key)) { |