diff options
| author | Stefan Monnier | 2002-02-02 23:48:37 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2002-02-02 23:48:37 +0000 |
| commit | 95c11956e9b24d3644d9ecd2c7652b90f434dd15 (patch) | |
| tree | 50f94065a111da066b2a90c8d986eb5ec05b982a /src/term.c | |
| parent | ee466d0b94320d5041dd34a2659d93c5c900ee3a (diff) | |
| download | emacs-95c11956e9b24d3644d9ecd2c7652b90f434dd15.tar.gz emacs-95c11956e9b24d3644d9ecd2c7652b90f434dd15.zip | |
(term_get_fkeys_1): If `k0' and `k;' are both specified and
with the same sequence, map that sequence to f10 rather than f0.
Diffstat (limited to 'src/term.c')
| -rw-r--r-- | src/term.c | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/src/term.c b/src/term.c index 48c107a8c89..19a1afa8c12 100644 --- a/src/term.c +++ b/src/term.c | |||
| @@ -1513,12 +1513,15 @@ term_get_fkeys_1 () | |||
| 1513 | 1513 | ||
| 1514 | if (k_semi) | 1514 | if (k_semi) |
| 1515 | { | 1515 | { |
| 1516 | if (k0) | ||
| 1517 | /* Define f0 first, so that f10 takes precedence in case the | ||
| 1518 | key sequences happens to be the same. */ | ||
| 1519 | Fdefine_key (Vfunction_key_map, build_string (k0), | ||
| 1520 | Fmake_vector (make_number (1), intern ("f0"))); | ||
| 1516 | Fdefine_key (Vfunction_key_map, build_string (k_semi), | 1521 | Fdefine_key (Vfunction_key_map, build_string (k_semi), |
| 1517 | Fmake_vector (make_number (1), intern ("f10"))); | 1522 | Fmake_vector (make_number (1), intern ("f10"))); |
| 1518 | k0_name = "f0"; | ||
| 1519 | } | 1523 | } |
| 1520 | 1524 | else if (k0) | |
| 1521 | if (k0) | ||
| 1522 | Fdefine_key (Vfunction_key_map, build_string (k0), | 1525 | Fdefine_key (Vfunction_key_map, build_string (k0), |
| 1523 | Fmake_vector (make_number (1), intern (k0_name))); | 1526 | Fmake_vector (make_number (1), intern (k0_name))); |
| 1524 | } | 1527 | } |