Commit 5cba3869 authored by Richard M. Stallman's avatar Richard M. Stallman

(describe_map): Call Fkey_description before build_string.

parent 4591cb90
......@@ -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;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment