(vc-consult-rcs-headers): Handle the new time

string formats of RCS 5.7.

diff --git a/lisp/vc-hooks.el b/lisp/vc-hooks.el
index 86c3711f37ff29f661f856cfc5c94812301fa3e6..1b31024ac8d83642b910f3a7f31c48f0a51a26c0 100644 (file)
--- a/lisp/vc-hooks.el
+++ b/lisp/vc-hooks.el
@@ -347,9 +347,9 @@ value of this flag.")
                                     (match-end 1))))
          ;; ... and check for the locking state
          (if (re-search-forward 
-              (concat "\\=[0-9]+/[0-9]+/[0-9]+ "    ; date
-                         "[0-9]+:[0-9]+:[0-9]+ "    ; time
-                         "[^ ]+ [^ ]+ ")            ; author & state
+              (concat "\\=[0-9]+[/-][0-9]+[/-][0-9]+ "             ; date
+                         "[0-9]+:[0-9]+:[0-9]+\\([+-][0-9:]+\\)? " ; time
+                         "[^ ]+ [^ ]+ ")                 ; author & state
               nil t)
              (cond 
               ;; unlocked revision