tm 7.72.

[elisp/tm.git] / mime-setup.el.in

diff --git a/mime-setup.el.in b/mime-setup.el.in
index de6ab66..9165ab9 100644 (file)
--- a/mime-setup.el.in
+++ b/mime-setup.el.in
@@ -6,7 +6,7 @@
 ;;;
 ;;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Version:
-;;;    $Id: mime-setup.el.in,v 7.16 1996/03/28 08:42:34 morioka Exp $
+;;;    $Id: mime-setup.el.in,v 7.21 1996/06/25 01:02:40 shuhei-k Exp $
 ;;; Keywords: mail, news, MIME, multimedia, multilingual, encoded-word
 ;;;
 ;;; This file is part of tm (Tools for MIME).
@@ -89,6 +89,12 @@
   )
 
 
+;;; @ for mu-cite
+;;;
+
+(add-hook 'mu-cite/pre-cite-hook 'mime/decode-message-header)
+
+
 ;;; @ for RMAIL and VM
 ;;;
 
@@ -130,6 +136,16 @@
 
 (add-hook 'message-setup-hook 'mime/editor-mode)
 (add-hook 'message-send-hook  'mime-editor/maybe-translate)
+(add-hook 'message-header-hook 'mime/encode-message-header)
+
+(call-after-loaded
+ 'tm-edit
+ (function
+  (lambda ()
+    (setq message-forward-start-separator
+         (concat (mime-make-tag "message" "rfc822") "\n"))
+    )))
+(setq message-forward-end-separator "")
 
 
 ;;; @ end
@@ -143,3 +159,4 @@
 ;;;
 ;;; Local Variables:
 ;;; mode: emacs-lisp
+;;; End: