branch: elpa/hyperdrive
commit c3d2d1e2eda033867902612c34073e45975fe61c
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@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