From dec21bcc9997780a9c56e4eb7f718fd64d8c32ec Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Sat, 15 Mar 2025 19:26:31 +0100 Subject: [PATCH] Use substitute-quotes for checkdoc errors * lisp/emacs-lisp/checkdoc.el (checkdoc-create-error): Use substitute-quotes. --- lisp/emacs-lisp/checkdoc.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el index a45c7dd04cc..c5f1e9a6ed5 100644 --- a/lisp/emacs-lisp/checkdoc.el +++ b/lisp/emacs-lisp/checkdoc.el @@ -1283,7 +1283,8 @@ generating a buffered list of errors.") "Used to create the return error text returned from all engines. TEXT, START, END and UNFIXABLE conform to `checkdoc-create-error-function', which see." - (funcall checkdoc-create-error-function text start end unfixable)) + (funcall checkdoc-create-error-function + (substitute-quotes text) start end unfixable)) (defun checkdoc--create-error-for-checkdoc (text start end &optional unfixable) "Create an error for Checkdoc.