procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Mail-utils fix for bug#7746. (tiny change)

Browse source 
* lisp/mail/mail-utils.el (mail-strip-quoted-names): Avoid clobbering
an existing temp buffer.
This commit is contained in:
Mark Lillibridge 2011-01-01 18:43:26 -08:00 • committed by Glenn Morris
parent 8de31eeccb
commit 9430e9882e
2 changed files with 7 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2011-01-02 Mark Lillibridge <mark.lillibridge@hp.com> (tiny change)
* mail/mail-utils.el (mail-strip-quoted-names): Avoid clobbering
an existing temp buffer. (Bug#7746)
2011-01-02 Glenn Morris <rgm@gnu.org>
* mail/mail-utils.el (mail-mbox-from): Handle From: headers with

6
lisp/mail/mail-utils.el
View file

@ -189,8 +189,7 @@ Return a modified address list."
;; Detect nested comments.
(if (string-match "[ \t]*(\\([^)\\]\\|\\\\.\\|\\\\\n\\)*(" address)
;; Strip nested comments.
(with-current-buffer (get-buffer-create " *temp*")
(erase-buffer)
(with-temp-buffer
(insert address)
(set-syntax-table lisp-mode-syntax-table)
(goto-char 1)
@ -203,8 +202,7 @@ Return a modified address list."
(forward-sexp 1)
(error (goto-char (point-max))))
(point))))
(setq address (buffer-string))
(erase-buffer))
(setq address (buffer-string)))
;; Strip non-nested comments an easier way.
(while (setq pos (string-match
;; This doesn't hack rfc822 nested comments