aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1994-07-16 19:30:21 +0000
committerRichard M. Stallman1994-07-16 19:30:21 +0000
commit4daaec5d0b9bcef8a843326b61573fb95b049135 (patch)
tree8beaa0e39ebc04f524c7666f8b38dc43a12f4ac2
parent8d2b0a2d0a77f0d57c4a91a546e0e230ed4125fc (diff)
downloademacs-4daaec5d0b9bcef8a843326b61573fb95b049135.tar.gz
emacs-4daaec5d0b9bcef8a843326b61573fb95b049135.zip
(add-change-log-entry): Use <...> around mail address.
-rw-r--r--lisp/add-log.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el
index 5a13e0054dd..fdc546c9a91 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -160,11 +160,11 @@ never append to an existing entry."
160 (if (looking-at (concat (regexp-quote (substring (current-time-string) 160 (if (looking-at (concat (regexp-quote (substring (current-time-string)
161 0 10)) 161 0 10))
162 ".* " (regexp-quote add-log-full-name) 162 ".* " (regexp-quote add-log-full-name)
163 " (" (regexp-quote add-log-mailing-address))) 163 " <" (regexp-quote add-log-mailing-address)))
164 (forward-line 1) 164 (forward-line 1)
165 (insert (current-time-string) 165 (insert (current-time-string)
166 " " add-log-full-name 166 " " add-log-full-name
167 " (" add-log-mailing-address ")\n\n")) 167 " <" add-log-mailing-address ">\n\n"))
168 168
169 ;; Search only within the first paragraph. 169 ;; Search only within the first paragraph.
170 (if (looking-at "\n*[^\n* \t]") 170 (if (looking-at "\n*[^\n* \t]")