;;; -*-Emacs-Lisp-*-
;;;
;;; $Id: SEMI-ELS,v 1.2 1998-03-12 12:40:37 morioka Exp $
;;;

(setq semi-modules-to-compile
      '(signature
	mime-def
	eword-decode eword-encode
	mime-parse mime-view mime-text mime-play mime-partial
	mime-edit
	semi-setup mail-mime-setup))

(setq semi-modules-not-to-compile nil)

(mapcar (function
	 (lambda (cell)
	   (let ((c-module (car cell))
		 (i-modules (cdr cell))
		 )
	     (if (module-installed-p c-module)
		 (setq semi-modules-to-compile
		       (nconc semi-modules-to-compile i-modules))
	       (setq semi-modules-not-to-compile
		     (nconc semi-modules-not-to-compile i-modules))
	       )
	     )))
	'((mailcrypt	mime-pgp mime-mc)
	  (bbdb		mime-bbdb)
	  ))

(if (or (string-match "XEmacs" emacs-version)
	(featurep 'mule))
    (setq semi-modules-to-compile
	  (nconc semi-modules-to-compile '(mime-image)))
  )

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

;;; SEMI-ELS ends here