Mercurial > emacs

changeset 65465:5780d53d7894

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(print_error_message): Pass copy of caller name to message_dolog.
author Kim F. Storm <storm@cua.dk>
date Mon, 12 Sep 2005 13:42:40 +0000
parents c9bed10cbf6d
children 1fdd6c36f42c
files src/print.c
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/print.c	Mon Sep 12 13:42:30 2005 +0000
+++ b/src/print.c	Mon Sep 12 13:42:40 2005 +0000
@@ -1025,7 +1025,9 @@
    *Messages*.  */
   if (!NILP (caller) && SYMBOLP (caller))
     {
-      const char *name = SDATA (SYMBOL_NAME (caller));
+      Lisp_Object cname = SYMBOL_NAME (caller);
+      char *name = alloca (SBYTES (cname));
+      bcopy (SDATA (cname), name, SBYTES (cname));
       message_dolog (name, strlen (name), 0, 0);
       message_dolog (": ", 2, 0, 0);
     }