-(if (module-installed-p 'mime-view)
- (progn
- (defconst wl-use-semi t)
- (setq WL-MODULES (append WL-MODULES (list 'wl-mime)))
- (setq ELMO-MODULES (append ELMO-MODULES (list 'elmo-mime))))
- (defconst wl-use-semi nil)
- (setq WL-MODULES (append WL-MODULES (list 'tm-wl))))