[gnus git] branch master updated: m0-13-97-g6aa54ac =1= qp.el: Don't replace "from " at bol

       via  6aa54ac28a20311bdd9655fbecdcbe4bdcea32c1 (commit)
      from  94f288135f95ca48fb50f5aa43bc09f9669c5c23 (commit)


- Log -----------------------------------------------------------------
commit 6aa54ac28a20311bdd9655fbecdcbe4bdcea32c1
Author: Daiki Ueno <[email protected]>
Date:   Fri Dec 4 13:36:31 2015 +0900

    qp.el: Don't replace "from " at bol
    
    * qp.el (quoted-printable-encode-region): Bind `case-fold-search' to
    nil when looking for "^From ".  Problem reported by Simon Josefsson.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 137f625..e2eba98 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2015-12-04  Daiki Ueno  <[email protected]>
+
+	* qp.el (quoted-printable-encode-region): Bind `case-fold-search' to
+	nil when looking for "^From ".  Problem reported by Simon Josefsson.
+
 2015-11-25  Katsumi Yamaoka  <[email protected]>
 
 	* nnml.el (nnml-retrieve-groups): Remove.  See:
diff --git a/lisp/qp.el b/lisp/qp.el
index 6c48f0f..d7ed30d 100644
--- a/lisp/qp.el
+++ b/lisp/qp.el
@@ -143,7 +143,8 @@ encode lines starting with \"From\"."
 	     (and (boundp 'mm-use-ultra-safe-encoding)
 		  mm-use-ultra-safe-encoding)))
 	(when (or fold mm-use-ultra-safe-encoding)
-	  (let ((tab-width 1))		; HTAB is one character.
+	  (let ((tab-width 1)		; HTAB is one character.
+		(case-fold-search nil))
 	    (goto-char (point-min))
 	    (while (not (eobp))
 	      ;; In ultra-safe mode, encode "From " at the beginning

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog |    5 +++++
 lisp/qp.el     |    3 ++-
 2 files changed, 7 insertions(+), 1 deletion(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project