bug#2104: 23.0.60; mail-yank-original is broken for rmail

[Glenn Morris]

Kenichi Handa wrote:

> When RMAIL buffer contains non-ascii text decoded by, for instance,
> iso-2022-jp and I type "r C-c C-y", non-decoded raw text is inserted
> in *mail* buffer.

Please try this:


*** rmail.el    30 Jan 2009 14:36:37 -0000      1.482
--- rmail.el    30 Jan 2009 20:04:07 -0000
***************
*** 3367,3373 ****
                        (mail-strip-quoted-names
                         (if (null cc) to (concat to ", " cc))))))
         (if (string= cc-list "") nil cc-list)))
!      rmail-view-buffer
       (list (list 'rmail-mark-message
                 rmail-buffer
                 (with-current-buffer rmail-buffer
--- 3367,3375 ----
                        (mail-strip-quoted-names
                         (if (null cc) to (concat to ", " cc))))))
         (if (string= cc-list "") nil cc-list)))
!      (if (rmail-buffers-swapped-p)
!        rmail-buffer
!        rmail-view-buffer)
       (list (list 'rmail-mark-message
                 rmail-buffer
                 (with-current-buffer rmail-buffer