From: João Távora <joaotavora@gmail.com>
Date: Thu, 17 May 2018 13:04:15 +0000 (+0100)
Subject: Fix eglot--error and eglot--message helpers
X-Git-Tag: emacs-29.0.90~1616^2~524^2~4^2~563
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1104060048f1e2fae7e5ed19a00bbe1d738a5861;p=emacs.git

Fix eglot--error and eglot--message helpers

* eglot.el (eglot--error, eglot--message):
Safely interpret %s.
---

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 30d5b435bbf..01a6b5d47f1 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -721,11 +721,11 @@ DEFERRED is passed to `eglot--async-request', which see."
 ;;;
 (defun eglot--error (format &rest args)
   "Error out with FORMAT with ARGS."
-  (error (apply #'format format args)))
+  (error "[eglot] %s" (apply #'format format args)))
 
 (defun eglot--message (format &rest args)
   "Message out with FORMAT with ARGS."
-  (message (concat "[eglot] " (apply #'format format args))))
+  (message "[eglot] %s" (apply #'format format args)))
 
 (defun eglot--warn (format &rest args)
   "Warning message with FORMAT and ARGS."