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

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

[nongnu] elpa/hyperdrive c3d2d1e2ed 03/10: Fix: (hyperdrive-time-greater


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive c3d2d1e2ed 03/10: Fix: (hyperdrive-time-greater-p) Don't return t if equal
Date: Sun, 22 Oct 2023 10:01:29 -0400 (EDT)

branch: elpa/hyperdrive
commit c3d2d1e2eda033867902612c34073e45975fe61c
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Fix: (hyperdrive-time-greater-p) Don't return t if equal
---
 hyperdrive-lib.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index c4e4ee1eba..ec1b8a828e 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -1424,7 +1424,8 @@ When PATH is nil or blank, return \"/\"."
 
 (defun hyperdrive-time-greater-p (a b)
   "Return non-nil if time value A is greater than B."
-  (not (time-less-p a b)))
+  (not (or (time-equal-p a b)
+           (time-less-p a b))))
 
 (defun hyperdrive--clean-buffer (&optional buffer)
   "Remove all local variables, overlays, and text properties in BUFFER.



reply via email to

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