diff --git a/doc/misc/gnus.texi b/doc/misc/gnus.texi index 61870311ed8..b3efdfbacba 100644 --- a/doc/misc/gnus.texi +++ b/doc/misc/gnus.texi @@ -12223,7 +12223,6 @@ controlling variable is a predicate list, as described above. @vindex gnus-treat-highlight-citation @vindex gnus-treat-highlight-headers @vindex gnus-treat-highlight-signature -@vindex gnus-treat-play-sounds @vindex gnus-treat-x-pgp-sig @vindex gnus-treat-unfold-headers @vindex gnus-treat-fold-headers @@ -12359,8 +12358,6 @@ is controlled by @code{gnus-body-boundary-delimiter}. @xref{Article Highlighting}. -@vindex gnus-treat-play-sounds -@item gnus-treat-play-sounds @item gnus-treat-ansi-sequences (t) @vindex gnus-treat-x-pgp-sig @item gnus-treat-x-pgp-sig (head) diff --git a/lisp/emacs-lisp/inline.el b/lisp/emacs-lisp/inline.el index 963e117ff34..de0112db631 100644 --- a/lisp/emacs-lisp/inline.el +++ b/lisp/emacs-lisp/inline.el @@ -71,7 +71,7 @@ (defmacro inline-quote (_exp) "Similar to backquote, but quotes code and only accepts , and not ,@." - (declare (debug backquote-form)) + (declare (debug (backquote-form))) (error "inline-quote can only be used within define-inline")) (defmacro inline-const-p (_exp) diff --git a/test/lisp/emacs-lisp/edebug-tests.el b/test/lisp/emacs-lisp/edebug-tests.el index d238bffdaa1..35259a796a0 100644 --- a/test/lisp/emacs-lisp/edebug-tests.el +++ b/test/lisp/emacs-lisp/edebug-tests.el @@ -1094,5 +1094,15 @@ This avoids potential duplicate definitions (Bug#41988)." (edebug-new-definition name)))) (should-error (eval-buffer) :type 'invalid-read-syntax)))) +(ert-deftest edebug-tests-inline () + "Check that Edebug can instrument inline functions (Bug#53068)." + (with-temp-buffer + (print '(define-inline edebug-tests-inline (arg) + (inline-quote ,arg)) + (current-buffer)) + (let ((edebug-all-defs t) + (edebug-initial-mode 'Go-nonstop)) + (eval-buffer)))) + (provide 'edebug-tests) ;;; edebug-tests.el ends here