From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 14 Jul 2023 01:51:03 +0000 (-0400)
Subject: * lisp/emacs-lisp/backtrace.el (backtrace--change-button-skip): Typo)
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=badbfd57cdaf9ea22aa9b64ff6bdc55da18b864c;p=emacs.git

* lisp/emacs-lisp/backtrace.el (backtrace--change-button-skip): Typo)
---

diff --git a/lisp/emacs-lisp/backtrace.el b/lisp/emacs-lisp/backtrace.el
index af06577fe56..1beeb523f08 100644
--- a/lisp/emacs-lisp/backtrace.el
+++ b/lisp/emacs-lisp/backtrace.el
@@ -413,12 +413,12 @@ the buffer."
       (overlay-put o 'evaporate t))))
 
 (defun backtrace--change-button-skip (beg end value)
-  "Change the skip property on all buttons between BEG and END.
+  "Change the `skip' property on all buttons between BEG and END.
 Set it to VALUE unless the button is a `cl-print-ellipsis' button."
   (let ((inhibit-read-only t))
     (setq beg (next-button beg))
     (while (and beg (< beg end))
-      (unless (eq (button-type beg) cl-print-ellipsis)
+      (unless (eq (button-type beg) 'cl-print-ellipsis)
           (button-put beg 'skip value))
       (setq beg (next-button beg)))))