From: ichikawa <ichikawa>
Date: Fri, 16 Oct 1998 15:28:12 +0000 (+0000)
Subject: Change message-send-hook to mime-edit-translate-hook
X-Git-Tag: pgnus-ichikawa-199811302358~158
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b3f4767a387a13b3cb0d7a667d48d389c3c8149a;p=elisp%2Fgnus.git-

Change message-send-hook to mime-edit-translate-hook
---

diff --git a/ChangeLog b/ChangeLog
index b6eeb03..37a018e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+1998-10-17  Tatsuya Ichikawa  <t-ichi@po.shiojiri.ne.jp>
+
+	* lisp/gnus-offline.el (gnus-offline-setup-needed-hooks): Change
+	message-send-hook to mime-edit-translate-hook.
+
+	* lisp/pop3-fma.el (pop3-fma-init-message-hook): Change
+	message-send-hook to mime-edit-translate-hook.
+
 1998-10-16  Katsumi Yamaoka   <yamaoka@jpl.org>
 
 	* lisp/gnus-msg.el (gnus-message-setup-hook): Replace the default
diff --git a/lisp/gnus-offline.el b/lisp/gnus-offline.el
index cbc3b0b..2f8e844 100644
--- a/lisp/gnus-offline.el
+++ b/lisp/gnus-offline.el
@@ -384,9 +384,9 @@ If value is nil , dialup line is disconnected status.")
   (add-hook 'gnus-after-getting-news-hook 'gnus-offline-after-get-new-news)
   (if (eq gnus-offline-news-fetch-method 'nnspool)
       (add-hook 'after-getting-news-hook 'gnus-offline-nnspool-hangup-line))
-  (add-hook 'message-send-hook 'gnus-offline-message-add-header)
+  (add-hook 'mime-edit-translate-hook 'gnus-offline-message-add-header)
   (if (featurep 'pop3-fma)
-      (add-hook 'message-send-hook 'pop3-fma-message-add-header)))
+      (add-hook 'mime-edit-translate-hook 'pop3-fma-message-add-header)))
 ;;
 ;; Get new news jobs. (gnus-agent and nnspool)
 ;;
diff --git a/lisp/pop3-fma.el b/lisp/pop3-fma.el
index 9801644..4f10cc8 100644
--- a/lisp/pop3-fma.el
+++ b/lisp/pop3-fma.el
@@ -154,7 +154,7 @@ Please do not set this valiable non-nil if you do not use Meadow.")
 (defvar pop3-fma-commandline-arguments nil)
 
 (defun pop3-fma-init-message-hook ()
-  (add-hook 'message-send-hook 'pop3-fma-message-add-header))
+  (add-hook 'mime-edit-translate-hook 'pop3-fma-message-add-header))
 
 (eval-after-load "message"
   '(pop3-fma-init-message-hook))