emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/goto-chg 9c16962 24/27: Don't byte-compile undo-tree-node-


From: Philip Kaludercic
Subject: [nongnu] elpa/goto-chg 9c16962 24/27: Don't byte-compile undo-tree-node-p invocation
Date: Sun, 1 Aug 2021 18:33:02 -0400 (EDT)

branch: elpa/goto-chg
commit 9c1696264e728f78924af874a55ccfb19317a702
Author: Brian Leung <leungbk@mailfence.com>
Commit: Brian Leung <leungbk@mailfence.com>

    Don't byte-compile undo-tree-node-p invocation
    
    Resolve an error for people using undo-tree.
    
    Also fix declare-function invocations: per the documentation for
    declare-function, external Elisp libraries should have 'ext:' in
    front.
---
 goto-chg.el | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/goto-chg.el b/goto-chg.el
index 4aa6003..ad35962 100644
--- a/goto-chg.el
+++ b/goto-chg.el
@@ -231,11 +231,10 @@ Return nil if E represents no real change.
 that is, it was previously saved or unchanged. Nil otherwise."
   (and (listp e) (eq (car e) t)))
 
-(declare-function undo-tree-current "undo-tree")
-(declare-function undo-tree-node-p "undo-tree")
-(declare-function undo-tree-node-previous "undo-tree")
-(declare-function undo-tree-node-undo "undo-tree")
-(declare-function undo-list-transfer-to-tree "undo-tree")
+(declare-function undo-tree-current "ext:undo-tree")
+(declare-function undo-tree-node-previous "ext:undo-tree")
+(declare-function undo-tree-node-undo "ext:undo-tree")
+(declare-function undo-list-transfer-to-tree "ext:undo-tree")
 (defvar buffer-undo-tree)
 
 ;;;###autoload
@@ -335,7 +334,7 @@ discarded. See variable `undo-limit'."
             (when (not glc-seen-canary)
               (setq l (cdr l)))))
         (when glc-seen-canary
-          (while (and (< n new-probe-depth) (undo-tree-node-p l))
+          (while (and (< n new-probe-depth) (eval '(undo-tree-node-p l)))
             (cond ((null l)
                    ;(setq this-command t)      ; Disrupt repeat sequence
                    (error "No further change info"))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]