3 ;;; $Id: tm-els,v 1.2 1996/03/04 08:57:38 morioka Exp $
10 (cond ((boundp 'NEMACS)
21 "tm-ew-d" "tm-parse" "tm-view" "tm-play" "tm-partial"
23 "tm-latex" "tm-html" "tm-tar" "tm-file"
30 (setq tm-uncompile-el-files '("sc-setup.el"))
32 (if (file-installed-p "ange-ftp.el")
33 (setq tm-modules (append tm-modules '("tm-ftp")))
34 (setq tm-uncompile-el-files
35 (append tm-uncompile-el-files '("tm-ftp.el")))
38 (if (file-installed-p "vm.elc")
39 (setq tm-modules (append tm-modules '("tm-vm")))
40 (setq tm-uncompile-el-files
41 (append tm-uncompile-el-files '("tm-vm.el")))
44 (if (file-installed-p "mailcrypt.el")
45 (setq tm-modules (append tm-modules '("tm-pgp")))
46 (setq tm-uncompile-el-files
47 (append tm-uncompile-el-files '("tm-pgp.el")))
50 (if (file-installed-p "bbdb.el")
51 (setq tm-modules (append tm-modules '("tm-bbdb")))
52 (setq tm-uncompile-el-files
53 (append tm-uncompile-el-files '("tm-bbdb.el")))
56 (if (and (file-exists-p "tm-evs.el")
60 (setq tm-modules (append tm-modules '("tm-evs")))
63 (if (string-match "XEmacs" emacs-version)
64 (setq tm-modules (append tm-modules '("tm-image")))
66 (if (file-installed-p "bitmap.el")
67 (setq tm-modules (append tm-modules '("tm-image")))
68 (setq tm-uncompile-el-files
69 (append tm-uncompile-el-files '("tm-image.el")))
74 (mapcar (function (lambda (module)
78 tm-uncompile-el-files))
81 (mapcar (function (lambda (module)
82 (concat module ".elc")
87 (setq setup-modules '("mime-setup"))
90 (mapcar (function (lambda (module)
96 (mapcar (function (lambda (module)
97 (concat module ".elc")