3 ;;; $Id: SEMI-ELS,v 1.2 1998-03-12 12:40:37 morioka Exp $
6 (setq semi-modules-to-compile
9 eword-decode eword-encode
10 mime-parse mime-view mime-text mime-play mime-partial
12 semi-setup mail-mime-setup))
14 (setq semi-modules-not-to-compile nil)
18 (let ((c-module (car cell))
19 (i-modules (cdr cell))
21 (if (module-installed-p c-module)
22 (setq semi-modules-to-compile
23 (nconc semi-modules-to-compile i-modules))
24 (setq semi-modules-not-to-compile
25 (nconc semi-modules-not-to-compile i-modules))
28 '((mailcrypt mime-pgp mime-mc)
32 (if (or (string-match "XEmacs" emacs-version)
34 (setq semi-modules-to-compile
35 (nconc semi-modules-to-compile '(mime-image)))
38 (setq semi-modules (append semi-modules-to-compile
39 semi-modules-not-to-compile))
41 ;;; SEMI-ELS ends here