changeset 38597:16d2187c5524

(mail-strip-quoted-names): Replace text literally. Reported by Sean Rima <sean@**Delete**.tcob1.net>.
author Gerd Moellmann <gerd@gnu.org>
date Mon, 30 Jul 2001 11:00:24 +0000
parents 75b7d03e0c11
children 9b8db46608be
files lisp/mail/mail-utils.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/mail-utils.el	Mon Jul 30 08:18:34 2001 +0000
+++ b/lisp/mail/mail-utils.el	Mon Jul 30 11:00:24 2001 +0000
@@ -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 @@
        (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