diff options
| author | Stefan Monnier | 2008-07-16 19:23:49 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2008-07-16 19:23:49 +0000 |
| commit | 0bcfd7d7798f089b5754ce188a33da2610620a3c (patch) | |
| tree | f3d09799f5b827e42c7f0da4b2f8a38aa2b45332 /src/keyboard.c | |
| parent | 178377e10f4956eeb2edd5b05481f3771d32b7df (diff) | |
| download | emacs-0bcfd7d7798f089b5754ce188a33da2610620a3c.tar.gz emacs-0bcfd7d7798f089b5754ce188a33da2610620a3c.zip | |
* keymap.c: Remove all NS-specific code.
(where_is_preferred_modifier, Vwhere_is_preferred_modifier): New vars.
(preferred_sequence_p): Rename from ascii_sequence_p; pay attention to
where_is_preferred_modifier, return a different value depending on how
preferred is the binding.
(where_is_internal): Adjust accordingly.
(Fwhere_is_internal): Refresh where_is_preferred_modifier.
Adjust to new preferred_sequence_p.
(syms_of_keymap): Declare `where-is-preferred-modifier'.
* keyboard.c (parse_solitary_modifier): Not static any more.
* keyboard.h (parse_solitary_modifier): Declare.
Diffstat (limited to 'src/keyboard.c')
| -rw-r--r-- | src/keyboard.c | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index 0ae24b70abb..219b42c2456 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -637,8 +637,6 @@ static Lisp_Object modify_event_symbol P_ ((int, unsigned, Lisp_Object, | |||
| 637 | Lisp_Object, char **, | 637 | Lisp_Object, char **, |
| 638 | Lisp_Object *, unsigned)); | 638 | Lisp_Object *, unsigned)); |
| 639 | static Lisp_Object make_lispy_switch_frame P_ ((Lisp_Object)); | 639 | static Lisp_Object make_lispy_switch_frame P_ ((Lisp_Object)); |
| 640 | static int parse_solitary_modifier P_ ((Lisp_Object)); | ||
| 641 | static int parse_solitary_modifier (); | ||
| 642 | static void save_getcjmp P_ ((jmp_buf)); | 640 | static void save_getcjmp P_ ((jmp_buf)); |
| 643 | static void save_getcjmp (); | 641 | static void save_getcjmp (); |
| 644 | static void restore_getcjmp P_ ((jmp_buf)); | 642 | static void restore_getcjmp P_ ((jmp_buf)); |
| @@ -6828,9 +6826,8 @@ has the same base event type and all the specified modifiers. */) | |||
| 6828 | /* Try to recognize SYMBOL as a modifier name. | 6826 | /* Try to recognize SYMBOL as a modifier name. |
| 6829 | Return the modifier flag bit, or 0 if not recognized. */ | 6827 | Return the modifier flag bit, or 0 if not recognized. */ |
| 6830 | 6828 | ||
| 6831 | static int | 6829 | int |
| 6832 | parse_solitary_modifier (symbol) | 6830 | parse_solitary_modifier (Lisp_Object symbol) |
| 6833 | Lisp_Object symbol; | ||
| 6834 | { | 6831 | { |
| 6835 | Lisp_Object name = SYMBOL_NAME (symbol); | 6832 | Lisp_Object name = SYMBOL_NAME (symbol); |
| 6836 | 6833 | ||