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

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

[elpa] externals/brief 1846c0e: Simplify/port brief-current-time


From: Paul Eggert
Subject: [elpa] externals/brief 1846c0e: Simplify/port brief-current-time
Date: Sat, 11 Dec 2021 22:12:19 -0500 (EST)

branch: externals/brief
commit 1846c0ea00d18bf8cb47aaf8fcb7150eb94ea2db
Author: Paul Eggert <eggert@cs.ucla.edu>
Commit: Paul Eggert <eggert@cs.ucla.edu>

    Simplify/port brief-current-time
    
    * brief.el (brief-current-time): Simplify and port it to future Emacs
    versions planned to use a different timestamp format.
---
 brief.el | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/brief.el b/brief.el
index b5b26fe..e91ce94 100644
--- a/brief.el
+++ b/brief.el
@@ -624,10 +624,7 @@ If FILE1 or FILE2 does not exist, the return value is 
unspecified."
 ;; Helper functions and macros
 (defun brief-current-time ()
   "Epoch time in floating point."
-  (let ((ct (current-time)))
-    (+ (logior (lsh (car ct) 16)
-               (cadr ct))
-       (* 1e-6 (caddr ct)))))
+  (float-time))
 
 (defvar brief-calibration-value 0.0
   "Latest calibration value of UI performance.



reply via email to

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