;;; @ 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)"))
)
+;;; @ for tm-comp
+;;;
+
+(call-after-loaded
+ 'tm-comp
+ (function
+ (lambda ()
+ (set-alist 'mime/message-sender-alist
+ 'news-reply-mode
+ (function gnus-inews-news))
+ )))
+
+
;;; @ end
;;;