summaryrefslogtreecommitdiff
path: root/lisp/gnus/qp.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/gnus/qp.el')
-rw-r--r--lisp/gnus/qp.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/gnus/qp.el b/lisp/gnus/qp.el
index 6c48f0fc9a4..d7ed30d3749 100644
--- a/lisp/gnus/qp.el
+++ b/lisp/gnus/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