diff options
author | Richard M. Stallman <rms@gnu.org> | 2001-11-07 03:35:05 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2001-11-07 03:35:05 +0000 |
commit | e5e64efc3f2efc2649ac7428b270a740205b5b31 (patch) | |
tree | 51d6f356aa3a2c8b5e7c482787b162dbc7d192bc /src/keymap.c | |
parent | 45ef479e7266bfc8655389a45b114cc8f0762dd6 (diff) | |
download | emacs-e5e64efc3f2efc2649ac7428b270a740205b5b31.tar.gz |
(access_keymap): Don't use initializers on Lisp_Object.
Diffstat (limited to 'src/keymap.c')
-rw-r--r-- | src/keymap.c | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/src/keymap.c b/src/keymap.c index 018e1ea1eb9..cb42d0e55a7 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -476,7 +476,10 @@ access_keymap (map, idx, t_ok, noinherit, autoload) int noinherit; int autoload; { - Lisp_Object val = Qunbound; + Lisp_Object val; + + /* Qunbound in VAL means we have found no binding yet. */ + val = Qunbound; /* If idx is a list (some sort of mouse click, perhaps?), the index we want to use is the car of the list, which @@ -516,7 +519,13 @@ access_keymap (map, idx, t_ok, noinherit, autoload) { Lisp_Object tail; - Lisp_Object t_binding = Qnil; + + /* t_binding is where we put a default binding that applies, + to use in case we do not find a binding specifically + for this key sequence. + + Lisp_Object t_binding; + t_binding = Qnil; /* If `t_ok' is 2, both `t' and generic-char bindings are accepted. If it is 1, only generic-char bindings are accepted. |