tm 7.38.

[elisp/tm.git] / gnus / tm-gnus.el

diff --git a/gnus/tm-gnus.el b/gnus/tm-gnus.el
index 6955405..aace694 100644 (file)
--- a/gnus/tm-gnus.el
+++ b/gnus/tm-gnus.el
@@ -9,7 +9,7 @@
 ;;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Created: 1993/11/20 (obsolete mol's gnus-mime.el)
 ;;; Version:
-;;;    $Id: tm-gnus.el,v 7.12 1995/12/07 10:21:22 morioka Exp $
+;;;    $Id: tm-gnus.el,v 7.13 1995/12/08 22:35:14 morioka Exp $
 ;;; Keywords: news, MIME, multimedia, encoded-word, multilingual
 ;;;
 ;;; This file is part of tm (Tools for MIME).
@@ -119,7 +119,9 @@
     (autoload 'tm-mail/insert-message "tm-mail")
     (set-alist 'mime-editor/message-inserter-alist
               'mail-mode (function tm-mail/insert-message))
-    (add-hook 'news-setup-hook 'mime-editor/attach-to-news-reply-menu)
+    (if (string-match "XEmacs\\|Lucid" emacs-version)
+       (add-hook 'news-setup-hook 'mime-editor/attach-to-news-reply-menu)
+      )
     )))