Mercurial > emacs

comparison admin/admin.el @ 40084:1f20d08b9da5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(add-release-logs): Put the log entry in lispref, too.
author Gerd Moellmann <gerd@gnu.org>
date Sat, 20 Oct 2001 10:00:30 +0000
parents 9b5a774d579b
children 795c8ca09f8b
comparison
equal deleted inserted replaced
40083:11d3de809486 40084:1f20d08b9da5
53 (let* ((logs (process-lines "find" root "-name" "ChangeLog")) 53 (let* ((logs (process-lines "find" root "-name" "ChangeLog"))
54 (entry (format "%s %s <%s>\n\n\t* Version %s released.\n\n" 54 (entry (format "%s %s <%s>\n\n\t* Version %s released.\n\n"
55 (format-time-string "%Y-%m-%d") 55 (format-time-string "%Y-%m-%d")
56 (user-full-name) user-mail-address version))) 56 (user-full-name) user-mail-address version)))
57 (dolist (log logs) 57 (dolist (log logs)
58 (unless (or (string-match "/gnus/" log) 58 (unless (string-match "/gnus/" log)
59 (string-match "/lispref/" log))
60 (find-file log) 59 (find-file log)
61 (goto-char (point-min)) 60 (goto-char (point-min))
62 (insert entry))))) 61 (insert entry)))))
63 62
64 63