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

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

[nongnu] elpa/hyperdrive 4fe4ad8d45 4/5: Fix: (h/history-fill-version-ra


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive 4fe4ad8d45 4/5: Fix: (h/history-fill-version-ranges) Pass VECP arg to copy-tree
Date: Sun, 28 Jul 2024 22:00:31 -0400 (EDT)

branch: elpa/hyperdrive
commit 4fe4ad8d45a23f17f91672d78ef407ac1a805a13
Author: Joseph Turner <joseph@ushin.org>
Commit: Joseph Turner <joseph@ushin.org>

    Fix: (h/history-fill-version-ranges) Pass VECP arg to copy-tree
---
 hyperdrive-history.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/hyperdrive-history.el b/hyperdrive-history.el
index fd8e7dd0e5..b6caaeeeff 100644
--- a/hyperdrive-history.el
+++ b/hyperdrive-history.el
@@ -245,7 +245,7 @@ prefix argument \\[universal-argument], prompt for ENTRY."
   (interactive (list (h/history-range-entry-at-point)))
   (pcase-let* ((`(,range . ,entry) range-entry)
                (`(,_range-start . ,(map :range-end)) range)
-               (range-end-entry (compat-call copy-tree entry))
+               (range-end-entry (compat-call copy-tree entry t))
                (ov (make-overlay (pos-bol) (+ (pos-bol) (length "Loading")))))
     (setf (he/version range-end-entry) range-end)
     (overlay-put ov 'display "Loading")



reply via email to

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