X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=TM-ELS;h=570ffcdabb96130bc2ae4be9e2c61218bdb991eb;hb=b77b17617ad6e2d752ffa07cc4232a54c6ebae81;hp=bae3bca996ce3276aae3053595ee7d1ae9a54b34;hpb=327711693e20cc80cb741d6c97d2c1ae3f383a70;p=elisp%2Ftm.git

diff --git a/TM-ELS b/TM-ELS
index bae3bca..570ffcd 100644
--- a/TM-ELS
+++ b/TM-ELS
@@ -1,14 +1,15 @@
 ;;; -*-Emacs-Lisp-*-
-;;;
-;;; $Id: TM-ELS,v 7.4 1996/09/17 04:39:33 morioka Exp $
-;;;
+
+;; TM-ELS: list of tm modules to install
+
+;;; Code:
 
 (setq tm-modules-to-compile
       '(signature
 	tm-def
-	tm-ew-d tm-parse tm-view tm-text tm-play tm-partial
+	tm-parse tm-view tm-text tm-play tm-partial
 	tm-latex tm-html tm-tar tm-file
-	tm-ew-e tm-edit
+	tm-edit
 	tm-setup))
 
 (setq tm-modules-not-to-compile '(sc-setup))
@@ -16,18 +17,18 @@
 (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)
 	  ))
 
 (if (and (file-exists-p "tm-evs.el")