[Emacs-commit] emacs/lisp/mh-e mh-compat.el ChangeLog

[Bill Wohler]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Branch:         
Changes by:     Bill Wohler <address@hidden>    06/03/11 01:34:46

Modified files:
        lisp/mh-e      : mh-compat.el ChangeLog 

Log message:
        (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).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/emacs/lisp/mh-e/mh-compat.el.diff?tr1=1.9&tr2=1.10&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/emacs/emacs/lisp/mh-e/ChangeLog.diff?tr1=1.177&tr2=1.178&r1=text&r2=text

Patches:
Index: emacs/lisp/mh-e/ChangeLog
diff -u emacs/lisp/mh-e/ChangeLog:1.177 emacs/lisp/mh-e/ChangeLog:1.178
--- emacs/lisp/mh-e/ChangeLog:1.177     Fri Mar 10 16:56:16 2006
+++ emacs/lisp/mh-e/ChangeLog   Sat Mar 11 01:34:45 2006
@@ -1,5 +1,10 @@
 2006-03-10  Bill Wohler  <address@hidden>
 
+       * 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).
 
Index: emacs/lisp/mh-e/mh-compat.el
diff -u emacs/lisp/mh-e/mh-compat.el:1.9 emacs/lisp/mh-e/mh-compat.el:1.10
--- emacs/lisp/mh-e/mh-compat.el:1.9    Sat Mar  4 21:23:21 2006
+++ emacs/lisp/mh-e/mh-compat.el        Sat Mar 11 01:34:45 2006
@@ -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))