From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 10 Feb 1994 00:35:15 +0000 (+0000)
Subject: (Fgarbage_collect): Save echo_area_glyphs_length.
X-Git-Tag: emacs-19.34~9977
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=51056d11c5b847cb203627df6ed39712530824c4;p=emacs.git

(Fgarbage_collect): Save echo_area_glyphs_length.
---

diff --git a/src/alloc.c b/src/alloc.c
index dffff224d50..f7544ab0b7c 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -1232,6 +1232,7 @@ Garbage collection happens automatically if you cons more than\n\
   register struct backtrace *backlist;
   register Lisp_Object tem;
   char *omessage = echo_area_glyphs;
+  int omessage_length = echo_area_glyphs_length;
   char stack_top_variable;
   register int i;
 
@@ -1374,7 +1375,7 @@ Garbage collection happens automatically if you cons more than\n\
     gc_cons_threshold = 10000;
 
   if (omessage || minibuf_level > 0)
-    message1 (omessage);
+    message2 (omessage, omessage_length);
   else if (!noninteractive)
     message1 ("Garbage collecting...done");