diff options
| author | Karoly Lorentey | 2006-02-12 00:15:44 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2006-02-12 00:15:44 +0000 |
| commit | 1913a2b35da45eeeb71ef851975be7d57c11de78 (patch) | |
| tree | 6cd59883fb931999da5b62c03b321ade6f77e66e /src/keymap.c | |
| parent | a5805c9d0240fab504f2a3e32db6449392005fb6 (diff) | |
| parent | a528b71e55b2b244a5dd35318713ccb20398cbbf (diff) | |
| download | emacs-1913a2b35da45eeeb71ef851975be7d57c11de78.tar.gz emacs-1913a2b35da45eeeb71ef851975be7d57c11de78.zip | |
Merged from emacs@sv.gnu.org
Patches applied:
* emacs@sv.gnu.org/emacs--devo--0--patch-49
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-50
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-51
Make constrain-to-field notice overlays
* emacs@sv.gnu.org/emacs--devo--0--patch-52
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-53
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-54
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-55
Merge from erc--emacs--0
* emacs@sv.gnu.org/emacs--devo--0--patch-56
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-57
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-58
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-59
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-60
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-61
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-62
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-63
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-64
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-65
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-66
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-67
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-68
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-69
rcirc: Add flexible response formatting; Add nick abbrevs
* emacs@sv.gnu.org/emacs--devo--0--patch-70
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-71
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-72
Update from CVS: man/dired.texi (Tumme): More tumme documentation.
* emacs@sv.gnu.org/gnus--rel--5.10--patch-18
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-19
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-20
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-21
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-22
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-23
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-24
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-25
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-26
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-27
Update from CVS: lisp/gnus.el: Remove bogus comment.
* emacs@sv.gnu.org/gnus--rel--5.10--patch-28
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-29
Add sendmail.el and smptmail.el from Emacs tree to contrib/
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-508
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 23 |
1 files changed, 7 insertions, 16 deletions
diff --git a/src/keymap.c b/src/keymap.c index fa64e88d6e5..ca8edab122b 100644 --- a/src/keymap.c +++ b/src/keymap.c | |||
| @@ -1,7 +1,7 @@ | |||
| 1 | /* Manipulation of keymaps | 1 | /* Manipulation of keymaps |
| 2 | Copyright (C) 1985, 1986, 1987, 1988, 1993, 1994, 1995, | 2 | Copyright (C) 1985, 1986, 1987, 1988, 1993, 1994, 1995, |
| 3 | 1998, 1999, 2000, 2001, 2002, 2003, 2004, | 3 | 1998, 1999, 2000, 2001, 2002, 2003, 2004, |
| 4 | 2005 Free Software Foundation, Inc. | 4 | 2005, 2006 Free Software Foundation, Inc. |
| 5 | 5 | ||
| 6 | This file is part of GNU Emacs. | 6 | This file is part of GNU Emacs. |
| 7 | 7 | ||
| @@ -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 | ||
| @@ -1363,13 +1363,6 @@ silly_event_symbol_error (c) | |||
| 1363 | static Lisp_Object *cmm_modes = NULL, *cmm_maps = NULL; | 1363 | static Lisp_Object *cmm_modes = NULL, *cmm_maps = NULL; |
| 1364 | static int cmm_size = 0; | 1364 | static int cmm_size = 0; |
| 1365 | 1365 | ||
| 1366 | /* Error handler used in current_minor_maps. */ | ||
| 1367 | static Lisp_Object | ||
| 1368 | current_minor_maps_error () | ||
| 1369 | { | ||
| 1370 | return Qnil; | ||
| 1371 | } | ||
| 1372 | |||
| 1373 | /* Store a pointer to an array of the keymaps of the currently active | 1366 | /* Store a pointer to an array of the keymaps of the currently active |
| 1374 | minor modes in *buf, and return the number of maps it contains. | 1367 | minor modes in *buf, and return the number of maps it contains. |
| 1375 | 1368 | ||
| @@ -1471,9 +1464,7 @@ current_minor_maps (modeptr, mapptr) | |||
| 1471 | } | 1464 | } |
| 1472 | 1465 | ||
| 1473 | /* Get the keymap definition--or nil if it is not defined. */ | 1466 | /* Get the keymap definition--or nil if it is not defined. */ |
| 1474 | temp = internal_condition_case_1 (Findirect_function, | 1467 | temp = Findirect_function (XCDR (assoc), Qt); |
| 1475 | XCDR (assoc), | ||
| 1476 | Qerror, current_minor_maps_error); | ||
| 1477 | if (!NILP (temp)) | 1468 | if (!NILP (temp)) |
| 1478 | { | 1469 | { |
| 1479 | cmm_modes[i] = var; | 1470 | cmm_modes[i] = var; |
| @@ -3875,11 +3866,11 @@ don't alter it yourself. */); | |||
| 3875 | Vminibuffer_local_completion_map = Fmake_sparse_keymap (Qnil); | 3866 | Vminibuffer_local_completion_map = Fmake_sparse_keymap (Qnil); |
| 3876 | Fset_keymap_parent (Vminibuffer_local_completion_map, Vminibuffer_local_map); | 3867 | Fset_keymap_parent (Vminibuffer_local_completion_map, Vminibuffer_local_map); |
| 3877 | 3868 | ||
| 3878 | DEFVAR_LISP ("minibuffer-local-filename-completion-map", | 3869 | DEFVAR_LISP ("minibuffer-local-filename-completion-map", |
| 3879 | &Vminibuffer_local_filename_completion_map, | 3870 | &Vminibuffer_local_filename_completion_map, |
| 3880 | doc: /* Local keymap for minibuffer input with completion for filenames. */); | 3871 | doc: /* Local keymap for minibuffer input with completion for filenames. */); |
| 3881 | Vminibuffer_local_filename_completion_map = Fmake_sparse_keymap (Qnil); | 3872 | Vminibuffer_local_filename_completion_map = Fmake_sparse_keymap (Qnil); |
| 3882 | Fset_keymap_parent (Vminibuffer_local_filename_completion_map, | 3873 | Fset_keymap_parent (Vminibuffer_local_filename_completion_map, |
| 3883 | Vminibuffer_local_completion_map); | 3874 | Vminibuffer_local_completion_map); |
| 3884 | 3875 | ||
| 3885 | 3876 | ||
| @@ -3889,11 +3880,11 @@ don't alter it yourself. */); | |||
| 3889 | Fset_keymap_parent (Vminibuffer_local_must_match_map, | 3880 | Fset_keymap_parent (Vminibuffer_local_must_match_map, |
| 3890 | Vminibuffer_local_completion_map); | 3881 | Vminibuffer_local_completion_map); |
| 3891 | 3882 | ||
| 3892 | DEFVAR_LISP ("minibuffer-local-must-match-filename-map", | 3883 | DEFVAR_LISP ("minibuffer-local-must-match-filename-map", |
| 3893 | &Vminibuffer_local_must_match_filename_map, | 3884 | &Vminibuffer_local_must_match_filename_map, |
| 3894 | doc: /* Local keymap for minibuffer input with completion for filenames with exact match. */); | 3885 | doc: /* Local keymap for minibuffer input with completion for filenames with exact match. */); |
| 3895 | Vminibuffer_local_must_match_filename_map = Fmake_sparse_keymap (Qnil); | 3886 | Vminibuffer_local_must_match_filename_map = Fmake_sparse_keymap (Qnil); |
| 3896 | Fset_keymap_parent (Vminibuffer_local_must_match_filename_map, | 3887 | Fset_keymap_parent (Vminibuffer_local_must_match_filename_map, |
| 3897 | Vminibuffer_local_must_match_map); | 3888 | Vminibuffer_local_must_match_map); |
| 3898 | 3889 | ||
| 3899 | DEFVAR_LISP ("minor-mode-map-alist", &Vminor_mode_map_alist, | 3890 | DEFVAR_LISP ("minor-mode-map-alist", &Vminor_mode_map_alist, |