emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] master 74c5d68 13/13: Use decoded time accessors in ediff-


From: Lars Ingebrigtsen
Subject: [Emacs-diffs] master 74c5d68 13/13: Use decoded time accessors in ediff-mult
Date: Tue, 30 Jul 2019 07:12:08 -0400 (EDT)

branch: master
commit 74c5d688bb29c34c7392267840102f006465dd02
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Use decoded time accessors in ediff-mult
    
    * lisp/vc/ediff-mult.el (ediff-format-date): Use decoded time
    accessors.
---
 lisp/vc/ediff-mult.el | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/lisp/vc/ediff-mult.el b/lisp/vc/ediff-mult.el
index b666900..1bdaca2 100644
--- a/lisp/vc/ediff-mult.el
+++ b/lisp/vc/ediff-mult.el
@@ -1205,13 +1205,12 @@ behavior."
 ;; TIME is like the output of decode-time
 (defun ediff-format-date (time)
   (format "%s %2d %4d %s:%s:%s"
-         (cdr (assoc (nth 4 time) ediff-months)) ; month
-         (nth 3 time) ; day
-         (nth 5 time) ; year
-         (ediff-fill-leading-zero (nth 2 time)) ; hour
-         (ediff-fill-leading-zero (nth 1 time)) ; min
-         (ediff-fill-leading-zero (nth 0 time)) ; sec
-         ))
+         (cdr (assoc (decoded-time-month time) ediff-months))
+         (decoded-time-day time)
+         (decoded-time-year time)
+         (ediff-fill-leading-zero (decoded-time-hour time))
+         (ediff-fill-leading-zero (decoded-time-minute time))
+         (ediff-fill-leading-zero (decoded-time-second time))))
 
 ;; Draw the directories
 (defun ediff-insert-dirs-in-meta-buffer (meta-list)



reply via email to

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