branch: elpa/hyperdrive commit a36923b803a60bdebcb2e29ebb981c761c894671 Author: Adam Porter <a...@alphapapa.net> Commit: Adam Porter <a...@alphapapa.net>
Tidy: (hyperdrive-time-greater-p) Minor optimization This way, when A is less than B, TIME-EQUAL-P won't be called. --- hyperdrive-lib.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el index ec1b8a828e..9664b1e9bd 100644 --- a/hyperdrive-lib.el +++ b/hyperdrive-lib.el @@ -1424,8 +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 (or (time-equal-p a b) - (time-less-p a b)))) + (not (or (time-less-p a b) + (time-equal-p a b)))) (defun hyperdrive--clean-buffer (&optional buffer) "Remove all local variables, overlays, and text properties in BUFFER.