Remove stray quotes

* lisp/emacs-lisp/bytecomp.el (byte-compile-form):
* lisp/help-fns.el (help-fns--interactive-only): Fix obvious mistake.
Since `interactive-only` is not supposed to be anything other than
a symbol at these points it was not a very consequential bug.

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index b1410fc26462f809af54d7f2d5fd542372265d26..b0c9667dc195d1955703936809b4ba52f25447de 100644 (file)
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -3443,7 +3443,7 @@ lambda-expression."
                                      (format "; %s"
                                              (substitute-command-keys
                                               interactive-only)))
-                                    ((and (symbolp 'interactive-only)
+                                    ((and (symbolp interactive-only)
                                           (not (eq interactive-only t)))
                                      (format-message "; use `%s' instead."
                                                       interactive-only))

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 84266e02901cc8e5d31fd9a0de8e25b0bf6b9845..50e60b68e17c3aa1a005d7cb237eff8688beb7aa 100644 (file)
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -778,7 +778,7 @@ the C sources, too."
                    ;; Cf byte-compile-form.
                    (cond ((stringp interactive-only)
                           (format ";\n  in Lisp code %s" interactive-only))
-                         ((and (symbolp 'interactive-only)
+                         ((and (symbolp interactive-only)
                                (not (eq interactive-only t)))
                           (format-message ";\n  in Lisp code use `%s' instead."
                                           interactive-only))