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.

diff --git a/lisp/tar-mode.el b/lisp/tar-mode.el
index 713f3d944bcca4f1996d17ea6028954840ca0fb3..95862dec82b062b5f0c418a45c11d528d7b572be 100644 (file)
--- 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")