diff options
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 21 |
1 files changed, 6 insertions, 15 deletions
diff --git a/src/keymap.c b/src/keymap.c index 01c637132eb..22b495033ef 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -69,7 +69,7 @@ Lisp_Object Vminibuffer_local_completion_map; | |||
| 69 | /* keymap used for minibuffers when doing completion in filenames */ | 69 | /* keymap used for minibuffers when doing completion in filenames */ |
| 70 | Lisp_Object Vminibuffer_local_filename_completion_map; | 70 | Lisp_Object Vminibuffer_local_filename_completion_map; |
| 71 | 71 | ||
| 72 | /* keymap used for minibuffers when doing completion in filenames | 72 | /* keymap used for minibuffers when doing completion in filenames |
| 73 | with require-match*/ | 73 | with require-match*/ |
| 74 | Lisp_Object Vminibuffer_local_must_match_filename_map; | 74 | Lisp_Object Vminibuffer_local_must_match_filename_map; |
| 75 | 75 | ||
| @@ -1403,13 +1403,6 @@ silly_event_symbol_error (c) | |||
| 1403 | static Lisp_Object *cmm_modes = NULL, *cmm_maps = NULL; | 1403 | static Lisp_Object *cmm_modes = NULL, *cmm_maps = NULL; |
| 1404 | static int cmm_size = 0; | 1404 | static int cmm_size = 0; |
| 1405 | 1405 | ||
| 1406 | /* Error handler used in current_minor_maps. */ | ||
| 1407 | static Lisp_Object | ||
| 1408 | current_minor_maps_error () | ||
| 1409 | { | ||
| 1410 | return Qnil; | ||
| 1411 | } | ||
| 1412 | |||
| 1413 | /* Store a pointer to an array of the keymaps of the currently active | 1406 | /* Store a pointer to an array of the keymaps of the currently active |
| 1414 | minor modes in *buf, and return the number of maps it contains. | 1407 | minor modes in *buf, and return the number of maps it contains. |
| 1415 | 1408 | ||
| @@ -1511,9 +1504,7 @@ current_minor_maps (modeptr, mapptr) | |||
| 1511 | } | 1504 | } |
| 1512 | 1505 | ||
| 1513 | /* Get the keymap definition--or nil if it is not defined. */ | 1506 | /* Get the keymap definition--or nil if it is not defined. */ |
| 1514 | temp = internal_condition_case_1 (Findirect_function, | 1507 | temp = Findirect_function (XCDR (assoc), Qt); |
| 1515 | XCDR (assoc), | ||
| 1516 | Qerror, current_minor_maps_error); | ||
| 1517 | if (!NILP (temp)) | 1508 | if (!NILP (temp)) |
| 1518 | { | 1509 | { |
| 1519 | cmm_modes[i] = var; | 1510 | cmm_modes[i] = var; |
| @@ -3753,11 +3744,11 @@ don't alter it yourself. */); | |||
| 3753 | Vminibuffer_local_completion_map = Fmake_sparse_keymap (Qnil); | 3744 | Vminibuffer_local_completion_map = Fmake_sparse_keymap (Qnil); |
| 3754 | Fset_keymap_parent (Vminibuffer_local_completion_map, Vminibuffer_local_map); | 3745 | Fset_keymap_parent (Vminibuffer_local_completion_map, Vminibuffer_local_map); |
| 3755 | 3746 | ||
| 3756 | DEFVAR_LISP ("minibuffer-local-filename-completion-map", | 3747 | DEFVAR_LISP ("minibuffer-local-filename-completion-map", |
| 3757 | &Vminibuffer_local_filename_completion_map, | 3748 | &Vminibuffer_local_filename_completion_map, |
| 3758 | doc: /* Local keymap for minibuffer input with completion for filenames. */); | 3749 | doc: /* Local keymap for minibuffer input with completion for filenames. */); |
| 3759 | Vminibuffer_local_filename_completion_map = Fmake_sparse_keymap (Qnil); | 3750 | Vminibuffer_local_filename_completion_map = Fmake_sparse_keymap (Qnil); |
| 3760 | Fset_keymap_parent (Vminibuffer_local_filename_completion_map, | 3751 | Fset_keymap_parent (Vminibuffer_local_filename_completion_map, |
| 3761 | Vminibuffer_local_completion_map); | 3752 | Vminibuffer_local_completion_map); |
| 3762 | 3753 | ||
| 3763 | 3754 | ||
| @@ -3767,11 +3758,11 @@ don't alter it yourself. */); | |||
| 3767 | Fset_keymap_parent (Vminibuffer_local_must_match_map, | 3758 | Fset_keymap_parent (Vminibuffer_local_must_match_map, |
| 3768 | Vminibuffer_local_completion_map); | 3759 | Vminibuffer_local_completion_map); |
| 3769 | 3760 | ||
| 3770 | DEFVAR_LISP ("minibuffer-local-must-match-filename-map", | 3761 | DEFVAR_LISP ("minibuffer-local-must-match-filename-map", |
| 3771 | &Vminibuffer_local_must_match_filename_map, | 3762 | &Vminibuffer_local_must_match_filename_map, |
| 3772 | doc: /* Local keymap for minibuffer input with completion for filenames with exact match. */); | 3763 | doc: /* Local keymap for minibuffer input with completion for filenames with exact match. */); |
| 3773 | Vminibuffer_local_must_match_filename_map = Fmake_sparse_keymap (Qnil); | 3764 | Vminibuffer_local_must_match_filename_map = Fmake_sparse_keymap (Qnil); |
| 3774 | Fset_keymap_parent (Vminibuffer_local_must_match_filename_map, | 3765 | Fset_keymap_parent (Vminibuffer_local_must_match_filename_map, |
| 3775 | Vminibuffer_local_must_match_map); | 3766 | Vminibuffer_local_must_match_map); |
| 3776 | 3767 | ||
| 3777 | DEFVAR_LISP ("minor-mode-map-alist", &Vminor_mode_map_alist, | 3768 | DEFVAR_LISP ("minor-mode-map-alist", &Vminor_mode_map_alist, |