emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/mm-decode.el
Date: Mon, 27 Sep 2004 04:01:52 -0400

Index: emacs/lisp/gnus/mm-decode.el
diff -c emacs/lisp/gnus/mm-decode.el:1.17 emacs/lisp/gnus/mm-decode.el:1.18
*** emacs/lisp/gnus/mm-decode.el:1.17   Mon Sep 20 21:22:15 2004
--- emacs/lisp/gnus/mm-decode.el        Mon Sep 27 07:44:44 2004
***************
*** 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))))
  
--- 623,636 ----
    "Copy the contents of the current buffer to a fresh buffer."
    (save-excursion
      (let ((obuf (current-buffer))
          beg)
        (goto-char (point-min))
        (search-forward-regexp "^\n" nil t)
        (setq beg (point))
!       (set-buffer
!        ;; Preserve the data's unibyteness (for url-insert-file-contents).
!        (let ((default-enable-multibyte-characters (mm-multibyte-p)))
!        (generate-new-buffer " *mm*")))
        (insert-buffer-substring obuf beg)
        (current-buffer))))
  




reply via email to

[Prev in Thread] Current Thread [Next in Thread]