tm 7.23.

[elisp/tm.git] / mk-tm

diff --git a/mk-tm b/mk-tm
index 68431f9..b8a2135 100644 (file)
--- a/mk-tm
+++ b/mk-tm
@@ -1,6 +1,6 @@
 ;;; -*-Emacs-Lisp-*-
 ;;;
-;;; $Id: mk-tm,v 6.0 1995/10/26 09:32:03 morioka Exp morioka $
+;;; $Id: mk-tm,v 7.0 1995/11/12 13:45:18 morioka Exp morioka $
 ;;;
 
 (setq load-path (append
@@ -13,9 +13,6 @@
                 load-path))
 
 (require 'tl-misc)
-(require 'gnus)
-(require 'tm-rich)
-(require 'mel-u)
 
 (setq tm-modules
       (append
@@ -33,7 +30,7 @@
          "tm-def"
          "tm-ew-d" "tm-ew-e" "tm-eword"
          "tm-parse" "tm-view" "tm-play" "tm-partial"
-         "tm-latex" "tm-w3" "tm-tar" "tm-file" "tm-mail"
+         "tm-latex" "tm-w3" "tm-tar" "tm-file"
          "tm-rmail" "tm-edit"
          "tm-setup" "mime-setup"
          ))
@@ -76,7 +73,10 @@
        (append tm-uncompile-el-files '("tm-vm.el")))
   )
 
-(if (file-exists-p "tm-evs.el")
+(if (and (file-exists-p "tm-evs.el")
+        (or (boundp 'MULE)
+            (boundp 'NEMACS))
+        )
     (setq tm-modules (append tm-modules '("tm-evs")))
   )
 
@@ -93,6 +93,9 @@
              tm-modules))
 
 (defun compile-tm ()
+  (require 'gnus)
+  (require 'tm-rich)
+  (require 'mel-u)
   (mapcar (function byte-compile-file file) tm-el-files)
   )