;;; -*-Emacs-Lisp-*-
;;;
-;;; $Id: TM-ELS,v 7.3 1996/09/06 15:40:10 morioka Exp $
+;;; $Id: TM-ELS,v 7.5 1996/12/10 08:29:42 morioka Exp $
;;;
(setq tm-modules-to-compile
(mapcar (function
(lambda (cell)
(let ((c-module (car cell))
- (i-module (cdr cell))
+ (i-modules (cdr cell))
)
(if (module-installed-p c-module)
(setq tm-modules-to-compile
- (nconc tm-modules-to-compile (list i-module)))
+ (nconc tm-modules-to-compile i-modules))
(setq tm-modules-not-to-compile
- (nconc tm-modules-not-to-compile (list i-module)))
+ (nconc tm-modules-not-to-compile i-modules))
)
)))
- '((ange-ftp . tm-ftp)
- (mailcrypt . tm-pgp)
- (bbdb . tm-bbdb)
+ '((ange-ftp tm-ftp)
+ (mailcrypt tm-pgp tm-edit-mc)
+ (bbdb tm-bbdb)
+ (tinypgpa tm-edit-tipgp)
))
(if (and (file-exists-p "tm-evs.el")
)
(if (or (string-match "XEmacs" emacs-version)
- (boundp 'MULE)
- )
+ (featurep 'mule))
(setq tm-modules-to-compile (nconc tm-modules-to-compile '(tm-image)))
)