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 6fb5fa09c7e67b32c9909474a0fc1ac6d87dc2e5..b33a106f3a94a08f26b3103d2c8172bde365d520 100644 (file)
--- 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)