summaryrefslogtreecommitdiff
path: root/admin/admin.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2013-03-09 18:18:49 -0800
committerGlenn Morris <rgm@gnu.org>2013-03-09 18:18:49 -0800
commit1a7bceef7a8cb7f32872e987d8786965f3ed26f0 (patch)
tree47b7b2207c5a00164205b323ad4bdd1dc479a602 /admin/admin.el
parent6b88120b111fb83db8d9854493a0e269b17adb11 (diff)
downloademacs-1a7bceef7a8cb7f32872e987d8786965f3ed26f0.tar.gz
* admin/admin.el (add-release-logs): Use UTC for release date.
Diffstat (limited to 'admin/admin.el')
-rw-r--r--admin/admin.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/admin/admin.el b/admin/admin.el
index fd9bde29f46..fc793c17bd2 100644
--- a/admin/admin.el
+++ b/admin/admin.el
@@ -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