diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-06-04 21:21:53 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-06-04 21:21:53 +0000 |
| commit | 64e870ac90b2e8d5c5eed9dbb3990237615090a6 (patch) | |
| tree | addf8f0a9e2beac577baeb8f81bc0df010a7012a | |
| parent | eb20931f181fc6254341e63648d0dc4f3152a550 (diff) | |
| download | emacs-64e870ac90b2e8d5c5eed9dbb3990237615090a6.tar.gz | |
(Fcopy_keymap): After copying a sub-char-table, do store the copy.
| -rw-r--r-- | src/keymap.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/keymap.c b/src/keymap.c index 32c4afb322d..ef7e90df53a 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -712,6 +712,8 @@ is not copied.") = (Lisp_Object *) alloca (3 * sizeof (Lisp_Object)); elt = Fcopy_sequence (elt); + XCONS (tail)->car = elt; + map_char_table (copy_keymap_1, Qnil, elt, elt, 0, indices); } else if (VECTORP (elt)) |