From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 29 Mar 1997 04:21:32 +0000 (+0000)
Subject: (make-auto-save-file-name): Replace both / and \
X-Git-Tag: emacs-20.1~2687
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b8f3a097ad560eab522fa9dc72f251ae31a87216;p=emacs.git

(make-auto-save-file-name): Replace both / and \
with sequences starting with %.
---

diff --git a/lisp/mail/mail-utils.el b/lisp/mail/mail-utils.el
index 2462a053409..71dd1950728 100644
--- a/lisp/mail/mail-utils.el
+++ b/lisp/mail/mail-utils.el
@@ -142,7 +142,7 @@ Usenet paths ending in an element that matches are removed also."
 		        "")
 		    (concat (regexp-quote (user-login-name))
 			    "\\>"))))
-  (let ((match (concat "\\(^\\|,\\)[ \t\n]*\\([^,\n]*!\\|\\)\\("
+  (let ((match (concat "\\(^\\|,\\)[ \t\n]*\\([^,\n]*[!<]\\|\\)\\("
 		       rmail-dont-reply-to-names
 		       "\\|[^\,.<]*<\\(" rmail-dont-reply-to-names "\\)"
 		       "\\)"))