;;; -*-Emacs-Lisp-*-
;;;
;;; $Id: TM-ELS,v 7.1 1996/08/21 11:56:50 morioka Exp $
;;;

(setq tm-modules-to-compile
      '(signature
	tm-def
	tm-ew-d tm-parse tm-view tm-text tm-play tm-partial
	tm-latex tm-html tm-tar tm-file
	tm-ew-e tm-edit
	tm-rmail tm-mail
	tm-setup))

(setq tm-modules-not-to-compile '(sc-setup))

(mapcar (function
	 (lambda (cell)
	   (let ((c-module (car cell))
		 (i-module (cdr cell))
		 )
	     (if (module-installed-p c-module)
		 (setq tm-modules-to-compile
		       (nconc tm-modules-to-compile (list i-module)))
	       (setq tm-modules-not-to-compile
		     (nconc tm-modules-not-to-compile (list i-module)))
	       )
	     )))
	'((ange-ftp	. tm-ftp)
	  (vm		. tm-vm)
	  (mailcrypt	. tm-pgp)
	  (bbdb		. tm-bbdb)
	  ))

(if (and (file-exists-p "tm-evs.el")
	 (or (boundp 'MULE)
	     (boundp 'NEMACS))
	 )
    (setq tm-modules-to-compile (nconc tm-modules-to-compile '(tm-evs)))
  )

(if (or (string-match "XEmacs" emacs-version)
	(boundp 'MULE)
	)
    (setq tm-modules-to-compile (nconc tm-modules-to-compile '(tm-image)))
  )

(setq tm-modules (append tm-modules-to-compile
			 tm-modules-not-to-compile))

;;; TM-ELS ends here