From 3c6356b037d0046f23abad9a4c2f1ccdec65e585 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jo=C3=A3o=20T=C3=A1vora?= Date: Tue, 19 Jul 2022 13:55:59 +0100 Subject: [PATCH] Appease byte-compiler warnings about wrong use of quotes * eglot.el (eglot-stay-out-of, eglot--code-action): Just give it what it wants. --- lisp/progmodes/eglot.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el index 582ad1fdee8..caebced5292 100644 --- a/lisp/progmodes/eglot.el +++ b/lisp/progmodes/eglot.el @@ -1596,9 +1596,8 @@ However, if you wish for Eglot to stay out of a particular Emacs facility that you'd like to keep control of add an element to this list and Eglot will refrain from setting it. -For example, to keep your Company customization use - -(add-to-list 'eglot-stay-out-of 'company)") +For example, to keep your Company customization, add the symbol +`company' to this variable.") (defun eglot--stay-out-of-p (symbol) "Tell if EGLOT should stay of of SYMBOL." @@ -3122,7 +3121,7 @@ at point. With prefix argument, prompt for ACTION-KIND." (defmacro eglot--code-action (name kind) "Define NAME to execute KIND code action." `(defun ,name (beg &optional end) - ,(format "Execute '%s' code actions between BEG and END." kind) + ,(format "Execute `%s' code actions between BEG and END." kind) (interactive (eglot--region-bounds)) (eglot-code-actions beg end ,kind))) -- 2.39.5