Use substitute-quotes for checkdoc errors

* lisp/emacs-lisp/checkdoc.el (checkdoc-create-error): Use
substitute-quotes.

(cherry picked from commit dec21bcc9997780a9c56e4eb7f718fd64d8c32ec)

diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el
index e772c3035c3bd8e41c6e93dd11e0bc3c5de2fde2..7dd0984b5413b72c37cd0c01da977bf7890ab533 100644 (file)
--- a/lisp/emacs-lisp/checkdoc.el
+++ b/lisp/emacs-lisp/checkdoc.el
@@ -1265,7 +1265,7 @@ generating a buffered list of errors.")
   "Used to create the return error text returned from all engines.
 TEXT, START, END and FIX conform to `checkdoc-create-error-function',
 which see."
-  (funcall checkdoc-create-error-function text start end fix))
+  (funcall checkdoc-create-error-function (substitute-quotes text) start end fix))
 
 (defun checkdoc--create-error-for-checkdoc (text start end &optional fix)
   "Create an error for Checkdoc.