diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-02-19 05:43:54 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-02-19 05:43:54 +0000 |
| commit | 5cba3869f59189c78f689f08540210393cae838f (patch) | |
| tree | 80967678ec4e0c7e2fc3451a069d72eeb492c926 /src/keymap.c | |
| parent | 4591cb9059790dfb3fd0f322e9edfc82d2c73d24 (diff) | |
| download | emacs-5cba3869f59189c78f689f08540210393cae838f.tar.gz | |
(describe_map): Call Fkey_description before build_string.
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/keymap.c b/src/keymap.c index 5cfb94fcb83..ae5698b2511 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -1652,8 +1652,12 @@ describe_map (map, keys, partial, shadow) register Lisp_Object keysdesc; if (!NILP (keys) && XFASTINT (Flength (keys)) > 0) - keysdesc = concat2 (Fkey_description (keys), - build_string (" ")); + { + Lisp_Object tem; + /* Call Fkey_description first, to avoid GC bug for the other string. */ + tem = Fkey_description (keys); + keysdesc = concat2 (tem, build_string (" ")); + } else keysdesc = Qnil; |