[Emacs-diffs] Changes to emacs/lisp/gnus/mm-decode.el

[Stefan Monnier]

Index: emacs/lisp/gnus/mm-decode.el
diff -c emacs/lisp/gnus/mm-decode.el:1.16 emacs/lisp/gnus/mm-decode.el:1.17
*** emacs/lisp/gnus/mm-decode.el:1.16   Mon Sep 20 12:03:04 2004
--- emacs/lisp/gnus/mm-decode.el        Mon Sep 20 21:22:15 2004
***************
*** 623,633 ****
--- 623,636 ----
    "Copy the contents of the current buffer to a fresh buffer."
    (save-excursion
      (let ((obuf (current-buffer))
+         (multibyte enable-multibyte-characters)
          beg)
        (goto-char (point-min))
        (search-forward-regexp "^\n" nil t)
        (setq beg (point))
        (set-buffer (generate-new-buffer " *mm*"))
+       ;; Preserve the data's unibyteness (for url-insert-file-contents).
+       (set-buffer-multibyte multibyte)
        (insert-buffer-substring obuf beg)
        (current-buffer))))
  
***************
*** 1486,1490 ****
  
  (provide 'mm-decode)
  
! ;;; arch-tag: 4f35d360-56b8-4030-9388-3ed82d359b9b
  ;;; mm-decode.el ends here
--- 1489,1493 ----
  
  (provide 'mm-decode)
  
! ;; arch-tag: 4f35d360-56b8-4030-9388-3ed82d359b9b
  ;;; mm-decode.el ends here