From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 23 Aug 2019 03:44:59 +0000 (+0200)
Subject: Use ISO8601 time formats in tar-mode
X-Git-Tag: emacs-27.0.90~1328^2~119
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=baae65d918e7f4c1f47057bc4b5f0302c3e47f38;p=emacs.git

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 713f3d944bc..95862dec82b 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")