From 70a2f2b09a902e0408aa0b640d0c2e1e5dcc6216 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Thu, 1 Aug 2019 13:48:08 +0200 Subject: [PATCH] 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'. --- lisp/vc/vc-cvs.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) -- 2.39.2