[Emacs-diffs] master baae65d: Use ISO8601 time formats in tar-mode

[Lars Ingebrigtsen]

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

    Use ISO8601 time formats in tar-mode
    
    * lisp/tar-mode.el (tar-clip-time-string): Make obsolete (bug#37130).
    (tar-header-block-summarize): Use ISO8601 time instead of
    home-brew format.
---
 lisp/tar-mode.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el
index 713f3d9..95862de 100644
--- a/lisp/tar-mode.el
+++ b/lisp/tar-mode.el
@@ -450,6 +450,7 @@ checksum before doing the check."
       (progn (beep) (message "Invalid checksum for file %s!" file-name))))
 
 (defun tar-clip-time-string (time)
+  (declare (obsolete format-time-string "27.1"))
   (let ((str (current-time-string time)))
     (concat " " (substring str 4 16) (format-time-string " %Y" time))))
 
@@ -508,7 +509,9 @@ MODE should be an integer which is a file mode value."
            (if (= 0 (length uname)) uid uname)
            (if (= 0 (length gname)) gid gname)
            size
-           (if tar-mode-show-date (tar-clip-time-string time) "")
+           (if tar-mode-show-date
+                (format-time-string " %FT%T" time)
+              "")
            (propertize name
                        'mouse-face 'highlight
                        'help-echo "mouse-2: extract this file into a buffer")