Update.

diff --git a/ChangeLog b/ChangeLog
index 26cac01..c15ce94 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,32 @@
+1998-11-12  Katsumi Yamaoka   <yamaoka@jpl.org>
+
+       * lisp/gnus-msg.el (gnus-summary-resend-bounced-mail): Bind
+       `gnus-message-setup-hook' to nil.
+
+       * lisp/message.el (message-bounce-setup-for-mime-edit): New
+       function.
+       (message-bounce-setup-function): New user option. Use
+       `message-bounce-setup-for-mime-edit' in default.
+       (message-bounce): Call `message-bounce-setup-function' if it is
+       non-nil.
+       (message-bounce-setup-hook): New user option.
+
+       * lisp/gnus-art.el (gnus-article-edit-done): Remove
+       `gnus-article-mime-edit-article-unwind' from
+       `gnus-article-mode-hook' before run `gnus-article-edit-exit'.
+       (gnus-article-edit-article): Call
+       `gnus-article-edit-article-setup-function' if it is non-nil.
+       (gnus-article-edit-article-setup-function): New user option. Use
+       `gnus-article-mime-edit-article-setup' in default.
+       (gnus-article-mime-edit-article-setup-hook): New hook.
+       (gnus-article-mime-edit-exit): New function. Use
+       `gnus-article-make-full-mail-header'.
+       (gnus-article-mime-edit-article-setup): Ditto.
+       (gnus-article-mime-edit-article-unwind): New function.
+       (gnus-article-make-full-mail-header): New function.
+       (gnus-article-prepare-display): New function.
+       (gnus-article-prepare): Use it.
+
 1998-11-11  Tatsuya Ichikawa  <t-ichi@po.shiojiri.ne.jp>
 
        * lisp/message.el (message-mode-map): Add new command key

diff --git a/TODO.ja b/TODO.ja
index 98a46ba..0dbd5cf 100644 (file)
--- a/TODO.ja
+++ b/TODO.ja
@@ -11,11 +11,11 @@ To do list.
 *1998/10/02-2 \e$B@_Dj%U%!%$%k72FI$_9~$_;~$N\e(B coding-system \e$BLdBj\e(B
 
 ----------- \e$BL$BP:v\e(B -----------
-    
+
 *1998/09/25-1 message/partial \e$B$N7k9g5!G=$N2~NI\e(B
 
-       Subject \e$B$G\e(B summary \e$B$r8!:w$9$kBe$o$j$K!"\e(Bgnus-newsgroup-headers \e$B$J\e(B
-       \e$B$I$N>pJs$r;H$C$F!"3N<B$K<+F07k9g$G$-$k$h$&$K$9$k!#\e(B
+    Subject \e$B$G\e(B summary \e$B$r8!:w$9$kBe$o$j$K!"\e(Bgnus-newsgroup-headers \e$B$J$I\e(B
+    \e$B$N>pJs$r;H$C$F!"3N<B$K<+F07k9g$G$-$k$h$&$K$9$k!#\e(B
 
 *1998/10/02-1 Draft \e$B$NJT=8!&Aw?.;~$N\e(B encode / decode \e$BLdBj\e(B
 
@@ -28,11 +28,6 @@ To do list.
     Offline \e$B;~$K%a%C%;!<%8$r:n@.$7$?>l9g!"\e(B Message-Id \e$B$N7A<0$,ITEv$J$b\e(B
     \e$B$N$K$J$C$F$7$^$&!#\e(B
 
-*1998/10/02-5 Edit article \e$B;~$K%a%C%;!<%8$rGK2u$9$kLdBj\e(B
-
-    nnml \e$BEy$GJ]B8$7$F$"$k%a%C%;!<%8$G\e(B edit article \e$B$r;HMQ$7$FJT=8$r9T$C\e(B
-    \e$B$?>l9g!"\e(B MIME entity \e$B$rGK2u$7$F$7$^$&!#\e(B
-
 *1998/10/02-6 smtpmail.el \e$B:o=|\e(B
 
     \e$B8=:_!"\e(B Semi-gnus \e$B$G$O\e(B smtpmail.el \e$B$r;HMQ$7$F$$$J$$$N$G:o=|$9$k!#\e(B
@@ -79,7 +74,7 @@ To do list.
 
     \e$B$3$3$K$O!"B>%V%i%s%A$GBP:vCf$^$?$O!"BP:v:Q$G\e(B gnus-V1_V2 \e$B;^$K<h$j9~\e(B
     \e$B$^$l$F$$$J$$$b$N$r4^$`!#\e(B
-    
+
 *1998/10/02-3 message/partial \e$B;HMQ;~$N\e(B Message-Id \e$BLdBj\e(B
 
     message/partial \e$B7A<0$G%a%C%;!<%8$rAw?.$7$?>l9g!"A4%Q!<%H$N\e(B
@@ -101,7 +96,7 @@ To do list.
     \e$B$h$&$K$J$C$?!#\e(B
 
 ----------- \e$BBP:v:Q\e(B -----------
-    
+
 *1998/10/02-8 User-Agent \e$B%X%C%@!<!&%U%#!<%k%I:NMQ\e(B
 
     1998/10/05 - \e$B40N;\e(B
@@ -113,5 +108,9 @@ To do list.
     1998/11/02 - \e$B40N;\e(B
 
 *1998/10/03-2 Info (gnus/gnus-ja) \e$B$NA*Br\e(B
-    
+
     \e$B40N;\e(B
+
+*1998/10/02-5 Edit article \e$B;~$K%a%C%;!<%8$rGK2u$9$kLdBj\e(B
+
+    1998/11/12 - \e$B40N;\e(B