tm 6.74.
[elisp/tm.git] / gnus / tm-dgnus.el
index c8da5be..bedfe88 100644 (file)
@@ -10,7 +10,7 @@
 ;;; @ version
 ;;;
 (defconst tm-gnus/RCS-ID
-  "$Id: tm-dgnus.el,v 6.15 1995/08/25 14:08:02 morioka Exp $")
+  "$Id: tm-dgnus.el,v 6.16 1995/08/30 02:44:11 morioka Exp $")
 
 (defconst tm-gnus/version
   (concat (get-version-string tm-gnus/RCS-ID) " (ding)"))
@@ -184,6 +184,19 @@ With arg, turn MIME processing on if arg is positive."
   )
 
 
+;;; @ for tm-comp
+;;;
+
+(call-after-loaded
+ 'tm-comp
+ (function
+  (lambda ()
+    (set-alist 'mime/message-sender-alist
+              'news-reply-mode
+              (function gnus-inews-news))
+    )))
+
+
 ;;; @ end
 ;;;