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

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

[nongnu] elpa/hyperdrive fd64117c35 5/8: Change: (he/within-version-rang


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive fd64117c35 5/8: Change: (he/within-version-range-p) Rename from he/within-version-range
Date: Fri, 16 Aug 2024 19:00:12 -0400 (EDT)

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

    Change: (he/within-version-range-p) Rename from he/within-version-range
    
    Suggested-by: Adam Porter <adam@alphapapa.net>
---
 hyperdrive-history.el | 2 +-
 hyperdrive-lib.el     | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/hyperdrive-history.el b/hyperdrive-history.el
index d02b5a961d..7bf8a04224 100644
--- a/hyperdrive-history.el
+++ b/hyperdrive-history.el
@@ -125,7 +125,7 @@ All other slots in each ewoc node entry data will be 
reused."
               (history-ewoc (buffer-local-value 'h/ewoc history-buffer))
               (history-node (and history-ewoc
                                  (h/ewoc-find-node history-ewoc entry
-                                   :predicate #'he/within-version-range)))
+                                   :predicate #'he/within-version-range-p)))
               (history-ewoc-entry (ewoc-data history-node)))
     (setf (map-elt (he/etc history-ewoc-entry) 'block-length-downloaded)
           (map-elt (he/etc entry) 'block-length-downloaded))
diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index c59eb58e9c..85c4746e3b 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -1735,7 +1735,7 @@ Compares their public keys."
   "Return non-nil if entries A and B have the same hyperdrive."
   (h/equal-p (he/hyperdrive a) (he/hyperdrive b)))
 
-(defun he/within-version-range (entry entry-with-range-end)
+(defun he/within-version-range-p (entry entry-with-range-end)
   "Return non-nil if ENTRY is within ENTRY-WITH-RANGE-END's range."
   (<= (he/version entry-with-range-end)
       (or (he/version entry)



reply via email to

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