don't assume positive timezone offset

closes #859
This commit is contained in:
Donald Curtis 2013-07-08 23:35:34 -07:00
parent 5327aa1a11
commit 1636f0caa0

View file

@ -333,7 +333,7 @@ Return a cons cell whose `car' is the root and whose `cdr' is the repository."
"-d" target-dir repo)))) "-d" target-dir repo))))
(apply 'pb/run-process dir "cvs" "log" (apply 'pb/run-process dir "cvs" "log"
(pb/expand-source-file-list dir config)) (pb/expand-source-file-list dir config))
(or (pb/find-parse-time-latest "date: \\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} [0-9]\\{2\\}:[0-9]\\{2\\}:[0-9]\\{2\\} \\+[0-9]\\{2\\}[0-9]\\{2\\}\\)") (or (pb/find-parse-time-latest "date: \\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\} [0-9]\\{2\\}:[0-9]\\{2\\}:[0-9]\\{2\\} [+-][0-9]\\{2\\}[0-9]\\{2\\}\\)")
(pb/find-parse-time-latest "date: \\([0-9]\\{4\\}/[0-9]\\{2\\}/[0-9]\\{2\\} [0-9]\\{2\\}:[0-9]\\{2\\}:[0-9]\\{2\\}\\);") (pb/find-parse-time-latest "date: \\([0-9]\\{4\\}/[0-9]\\{2\\}/[0-9]\\{2\\} [0-9]\\{2\\}:[0-9]\\{2\\}:[0-9]\\{2\\}\\);")
(error "No valid timestamps found!")) (error "No valid timestamps found!"))
))) )))