Patch by Ed L. Cashin to make gnus-move-split-methods move to

[gnus] / lisp / qp.el

diff --git a/lisp/qp.el b/lisp/qp.el
index c55cb9e..79e4362 100644 (file)
--- a/lisp/qp.el
+++ b/lisp/qp.el
@@ -92,9 +92,9 @@ If `mm-use-ultra-safe-encoding' is set, fold unconditionally and
 encode lines starting with \"From\"."
   (interactive "r")
   (save-excursion
-    (mm-with-unibyte-current-buffer
-      (save-restriction
-       (narrow-to-region from to)
+    (save-restriction
+      (narrow-to-region from to)
+      (mm-with-unibyte-current-buffer-mule4
        ;;      (mm-encode-body)
        ;; Encode all the non-ascii and control characters.
        (goto-char (point-min))