diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2001-07-30 11:00:46 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2001-07-30 11:00:46 +0000 |
| commit | 8744971146533b8f1010b99cd8ada7dc813b6b4c (patch) | |
| tree | 925c854c56cd5c18fcc65c4835c11a28dae526a1 | |
| parent | 6594ac22d459f97ece708d4ee04b63d133d9a881 (diff) | |
| download | emacs-8744971146533b8f1010b99cd8ada7dc813b6b4c.tar.gz | |
(mail-strip-quoted-names): Replace text
literally. Reported by Sean Rima <sean@**Delete**.tcob1.net>.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/mail/mail-utils.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8b30afe17cc..88df059d55c 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -5,6 +5,11 @@ * desktop.el (desktop-save): Add `-*- coding: emacs-mule -*-' to the desktop file. +2001-07-30 Simon Josefsson <jas@extundo.com> + + * mail/mail-utils.el (mail-strip-quoted-names): Replace text + literally. Reported by Sean Rima <sean@**Delete**.tcob1.net>. + 2001-07-27 Gerd Moellmann <gerd@gnu.org> * emacs-lisp/lisp-mode.el (last-sexp-setup-props): New function. diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el index 5526dc10404..84ed13e58bb 100644 --- a/lisp/mail/mail-utils.el +++ b/lisp/mail/mail-utils.el @@ -1,6 +1,6 @@ ;;; mail-utils.el --- utility functions used both by rmail and rnews -;; Copyright (C) 1985 Free Software Foundation, Inc. +;; Copyright (C) 1985, 2001 Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: mail, news @@ -194,7 +194,7 @@ Return a modified address list." (while (setq pos (string-match "\\(,\\s-*\\|\\`\\)\\([^,]*<\\([^>,:]*\\)>[^,]*\\)\\(\\s-*,\\|\\'\\)" address)) (setq address (replace-match (match-string 3 address) - nil nil address 2))) + nil 'literal address 2))) address)))) ; rmail-dont-reply-to-names is defined in loaddefs |