From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Thu, 1 Aug 2019 11:48:08 +0000 (+0200)
Subject: Use decoded-time accessors in vc-cvs
X-Git-Tag: emacs-27.0.90~1782
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=70a2f2b09a902e0408aa0b640d0c2e1e5dcc6216;p=emacs.git

Use decoded-time accessors in vc-cvs

* lisp/vc/vc-cvs.el (vc-cvs-parse-entry): Use decoded-time
accessors for results from `parse-time-string'.
---

diff --git a/lisp/vc/vc-cvs.el b/lisp/vc/vc-cvs.el
index 6fb5fa09c7e..b33a106f3a9 100644
--- a/lisp/vc/vc-cvs.el
+++ b/lisp/vc/vc-cvs.el
@@ -1180,7 +1180,7 @@ is non-nil."
            (parsed-time (progn (require 'parse-time)
                                (parse-time-string (concat time " +0000")))))
       (cond ((and (not (string-match "\\+" time))
-                  (car parsed-time)
+                  (decoded-time-second parsed-time)
                   ;; Compare just the seconds part of the file time,
                   ;; since CVS file time stamp resolution is just 1 second.
 		  (= (encode-time mtime 'integer)