]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix format error in Faccept_process_output
authorMichael Albinus <michael.albinus@gmx.de>
Fri, 13 Jul 2018 12:27:33 +0000 (14:27 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Fri, 13 Jul 2018 12:27:33 +0000 (14:27 +0200)
* src/process.c (Faccept_process_output): Do not use format spec
"%p", it isn't valid for error().

src/process.c

index f7b96d28543e7ccf26cada0292e39d26fbc68d2e..8629f834e7945e3032f7a0938e2c46eef48334d3 100644 (file)
@@ -4602,12 +4602,11 @@ is nil, from any process) before the timeout expired.  */)
        {
          Lisp_Object proc_thread_name = XTHREAD (proc->thread)->name;
 
-         if (STRINGP (proc_thread_name))
-           error ("Attempt to accept output from process %s locked to thread %s",
-                  SDATA (proc->name), SDATA (proc_thread_name));
-         else
-           error ("Attempt to accept output from process %s locked to thread %p",
-                  SDATA (proc->name), XTHREAD (proc->thread));
+         error ("Attempt to accept output from process %s locked to thread %s",
+                SDATA (proc->name),
+                STRINGP (proc_thread_name)
+                ? SDATA (proc_thread_name)
+                : SDATA (Fprin1_to_string (proc->thread, Qt)));
        }
     }
   else