Mercurial > emacs

diff src/keymap.c @ 1890:0ca7640360bd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(describe_map): Call Fkey_description before build_string.
author Richard M. Stallman <rms@gnu.org>
date Fri, 19 Feb 1993 05:43:54 +0000
parents 00bee181f7ed
children 648bc44d182a
line wrap: on
line diff
--- a/src/keymap.c	Fri Feb 19 05:06:28 1993 +0000
+++ b/src/keymap.c	Fri Feb 19 05:43:54 1993 +0000
@@ -1652,8 +1652,12 @@
   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;