[Mew-dist 168] sample patch: Use gnus-mail-forward-using-mew with current mew

Makoto MATSUSHITA matusita at example.com
1996年 11月 26日 (火) 03:00:20 JST


mew-gnus ねたですが‥‥こいつに入ってる gnus-mail-forward-using-mew を
現行の version で使うようにするための patch です.mew の構造を知らない
のと,elisp がそもそもよくわかってないので,これで良いのかは私にはわか
りませんが,一応それなりに期待した動作をしてくれているようです.

mew-gnus にはこの他

<19961119163800U/ksakai at example.com>
<19961121125928U/y-koga at example.com>
<19961123202839S.y-koga at example.com>

の 3 つに含まれる patch をあてるとそれなりに使えるようになって(少なく
とも GNUS 4.1 の私は)幸せになれました _o_

最後にくっつける patch は,上記 3 つの patch があたった後に対する 
patch になってますが,patch あて自体には問題はないでしょう.もし patch 
に嘘があったらごめんなさい.

-- -
Makoto `MAR_kun' MATSUSHITA

--- mew-gnus.el.patched	Tue Nov 26 02:05:17 1996
+++ mew-gnus.el	Tue Nov 26 02:49:28 1996
@@ -102,10 +102,10 @@
 	  (switch-to-buffer-other-window (find-file-noselect file))
 	  (mew-draft-header subject 'nl)
 	  (mew-draft-mode)
-	  (setq mew-multi-syntax
-		(mew-multi-multi-syntax (file-name-nondirectory mimedir) 1))
+	  (setq mew-encode-syntax
+		(mew-encode-syntax-initial-multi (file-name-nondirectory mimedir) 1))
 	  (save-excursion
-	    (mew-draft-prepare-multipart)))
+	    (mew-draft-prepare-attachments)))
       (save-buffer))) ;; to make sure no to use this draft again
   (message "Draft is prepared"))
 



Mew-dist メーリングリストの案内