From: Stefan Kangas <stefankangas@gmail.com>
Date: Fri, 28 Feb 2025 01:20:40 +0000 (+0100)
Subject: Don't use incf/decf in eldoc.el
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ae7f902c15bc0bb311a40a24dc20f891de847d80;p=emacs.git

Don't use incf/decf in eldoc.el

* lisp/emacs-lisp/eldoc.el (eldoc--invoke-strategy): Don't use incf or
decf.  This is a :core package and supports Emacs 26.3.  (Bug#76604)

(cherry picked from commit 64edd5a5eb832c2ca9f4495c17e880a86179f826)
---

diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el
index 26049844447..37e39800256 100644
--- a/lisp/emacs-lisp/eldoc.el
+++ b/lisp/emacs-lisp/eldoc.el
@@ -872,7 +872,7 @@ the docstrings eventually produced, using
            interactive))
          (make-callback
           (method origin)
-          (let ((pos (prog1 howmany (incf howmany))))
+          (let ((pos (prog1 howmany (cl-incf howmany))))
             (cl-ecase method
               (:enthusiast
                (lambda (string &rest plist)
@@ -889,10 +889,10 @@ the docstrings eventually produced, using
                                     nil #'display-doc))
                  t))
               (:patient
-               (incf want)
+               (cl-incf want)
                (lambda (string &rest plist)
                  (register-doc pos string plist origin)
-                 (when (zerop (decf want)) (display-doc))
+                 (when (zerop (cl-decf want)) (display-doc))
                  t))
               (:eager
                (lambda (string &rest plist)