* admin/admin.el (add-release-logs): Use UTC for release date.

This commit is contained in:
Glenn Morris 2013-03-09 18:18:49 -08:00
parent 6b88120b11
commit 1a7bceef7a
2 changed files with 8 additions and 2 deletions

View file

@ -1,3 +1,7 @@
2013-03-10 Glenn Morris <rgm@gnu.org>
* admin.el (add-release-logs): Use UTC for release date.
2013-03-09 Glenn Morris <rgm@gnu.org>
* admin.el (add-release-logs): Provide interactive defaults.

View file

@ -42,12 +42,14 @@ Optional argument DATE is the release date, default today."
emacs-minor-version))
(read-string "Release date: "
(progn (require 'add-log)
(funcall add-log-time-format)))))
(let ((add-log-time-zone-rule t))
(funcall add-log-time-format))))))
(setq root (expand-file-name root))
(unless (file-exists-p (expand-file-name "src/emacs.c" root))
(error "%s doesn't seem to be the root of an Emacs source tree" root))
(require 'add-log)
(or date (setq date (funcall add-log-time-format)))
(or date (setq date (let ((add-log-time-zone-rule t))
(funcall add-log-time-format))))
(let* ((logs (process-lines "find" root "-name" "ChangeLog"))
(entry (format "%s %s <%s>\n\n\t* Version %s released.\n\n"
date