[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ebdb-gnorb c7c9bd5: Simplify/port ebdb-gnorb-lapsed-day
From: |
Paul Eggert |
Subject: |
[elpa] externals/ebdb-gnorb c7c9bd5: Simplify/port ebdb-gnorb-lapsed-days |
Date: |
Sat, 11 Dec 2021 18:14:50 -0500 (EST) |
branch: externals/ebdb-gnorb
commit c7c9bd518b332e913d45a2fd70fd09813d833e16
Author: Paul Eggert <eggert@cs.ucla.edu>
Commit: Paul Eggert <eggert@cs.ucla.edu>
Simplify/port ebdb-gnorb-lapsed-days
* packages/ebdb-gnorb/ebdb-gnorb.el (ebdb-gnorb-lapsed-days):
Update from article-lapsed-string, so as not to assume
internal structure of Elisp timestamps. This should work
better with future Emacs versions.
---
ebdb-gnorb.el | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/ebdb-gnorb.el b/ebdb-gnorb.el
index f210737..8a54fc9 100644
--- a/ebdb-gnorb.el
+++ b/ebdb-gnorb.el
@@ -128,10 +128,8 @@ message was received."
;; dates in the future, though that's stupid.
(let* ((now (current-time))
(delta (time-subtract now date))
- (real-sec (and delta
- (+ (* (float (car delta)) 65536)
- (cadr delta))))
- (sec (and delta (abs real-sec))))
+ (real-sec (float-time delta))
+ (sec (abs real-sec)))
(floor (/ sec 86400))))
(cl-defmethod ebdb-fmt-field ((_fmt ebdb-formatter-ebdb)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/ebdb-gnorb c7c9bd5: Simplify/port ebdb-gnorb-lapsed-days,
Paul Eggert <=