[Mew-dist 309] Re: Re: How to reply from Gnus-5.3 with mew?

[Shuhei KOBAYASHI]

  こばやし@JAIST です。

  mew-gnus.el は全然見ていないので、patch は書けませんが...

>>>>> In <199612170617.PAA08360 at example.com>,
>>>>> Mito <mit at example.com> wrote:
> GNU Emacs 19.34.2 (mips-nec-sysv4, X toolkit)
> Mule Version 2.3 (SUETSUMUHANA)
> Gnus v5.2.40; nntp 4.0; nnspool 2.0
> tm-7.96
> で行いました。
...
> -  (gnus-summary-select-article gnus-save-all-headers gnus-save-all-headers)
> +  (let ((gnus-show-mime nil))
> +    (gnus-summary-select-article gnus-save-all-headers gnus-save-all-headers))
...
>    (let* ((buffer
> -	  (if (string-match "v5" gnus-version)
> -	      (pop-to-buffer (or buffer gnus-article-buffer))
> -	    (current-buffer)))
> +	  (if (not (string-match "v5" gnus-version))
> +	      (current-buffer)
> +	    (if gnus-show-mime
> +		(let ((gnus-show-mime nil))
> +		  (gnus-summary-select-article t 'force)))
> +	    (pop-to-buffer (or buffer gnus-article-buffer))))

  September Gnus から(Gnus 5.1 以降)、gnus-original-article-buffer が
新設され、未加工の記事がここに置かれるようになりました。また、gnus-
article-buffer に対して加工を行なうのは tm だけとは限りませんので、
gnus-show-mime を nil にするだけでは問題が出るかもしれません。

        (pop-to-buffer (or buffer
                           (and (boundp 'gnus-original-article-buffer)
                                gnus-original-article-buffer)
                           gnus-article-buffer))

のようにすれば gnus-version を調べる必要もなくなるかと思います。
＃"v5" で version check されると Red Gnus で使えない(;_;)
-- 
小林 修平 / Shuhei KOBAYASHI / <shuhei-k at example.com>
http://www.jaist.ac.jp/~shuhei-k/bbdb-mew.el