# HG changeset patch
# User Bill Wohler <wohler@newt.com>
# Date 1142040885 0
# Node ID 7b2d244e58fe80b730c3264b76af00f26062c896
# Parent  29fe34ec22960b871f9813cf6209d6b9686fc44b
(mh-replace-regexp-in-string): Pass the literal flag to
replace-in-string. This was badly needed by mh-quote-pick-expr in
order to properly quote subjects when using / s on XEmacs (closes SF
#1447598).

diff -r 29fe34ec2296 -r 7b2d244e58fe lisp/mh-e/ChangeLog
--- a/lisp/mh-e/ChangeLog	Fri Mar 10 23:43:54 2006 +0000
+++ b/lisp/mh-e/ChangeLog	Sat Mar 11 01:34:45 2006 +0000
@@ -1,5 +1,10 @@
 2006-03-10  Bill Wohler  <wohler@newt.com>
 
+	* mh-compat.el (mh-replace-regexp-in-string): Pass the literal
+	flag to replace-in-string. This was badly needed by
+	mh-quote-pick-expr in order to properly quote subjects when using
+	/ s on XEmacs (closes SF #1447598).
+
 	* mh-e.el (mh-profile-component): Drop `s' from mhparam
 	-components for Mailutils compatibility (closes SF #1446985).
 
diff -r 29fe34ec2296 -r 7b2d244e58fe lisp/mh-e/mh-compat.el
--- a/lisp/mh-e/mh-compat.el	Fri Mar 10 23:43:54 2006 +0000
+++ b/lisp/mh-e/mh-compat.el	Sat Mar 11 01:34:45 2006 +0000
@@ -232,8 +232,9 @@
   "Replace REGEXP with REP everywhere in STRING and return result.
 This function is used by XEmacs that lacks `replace-regexp-in-string'.
 The function `replace-in-string' is used instead.
-The arguments FIXEDCASE, LITERAL, SUBEXP, and START are ignored."
-  (replace-in-string string regexp rep))
+The arguments FIXEDCASE, SUBEXP, and START, used by
+`replace-in-string' are ignored."
+  (replace-in-string string regexp rep literal))
 
 ;; Copy of constant from url-util.el in Emacs 22; needed by Emacs 21.
 (if (not (boundp 'url-unreserved-chars))