X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=EMU-ELS;h=39259c4ea7ff3160217e23e0f9303939e2892b6c;hb=acaf4f22fb7441eb1e0a5c9541b31f1352a271e2;hp=3611d436d6b13a8533e1a777f9c0406521f1efaf;hpb=5760307aa255d1dc28a7e5861c63efb020dadb25;p=elisp%2Fapel.git

diff --git a/EMU-ELS b/EMU-ELS
index 3611d43..39259c4 100644
--- a/EMU-ELS
+++ b/EMU-ELS
@@ -15,14 +15,13 @@
       (poem-modules '(poem))
       (mcs-modules '(mcharset))
       (invisible-modules '(invisible))
-      pccl-modules)
+      (pccl-modules '(pccl)))
   (cond ((featurep 'xemacs)
 	 (setq poe-modules (cons 'poe-xemacs poe-modules)
 	       invisible-modules (cons 'inv-xemacs invisible-modules))
 	 )
 	((>= emacs-major-version 19)
-	 (setq poe-modules (cons 'poe-19 poe-modules)
-	       invisible-modules (cons 'inv-19 invisible-modules))
+	 (setq invisible-modules (cons 'inv-19 invisible-modules))
 	 )
 	(t
 	 (setq poe-modules (cons 'poe-18 poe-modules)
@@ -34,7 +33,7 @@
 							poem-modules))
 		      mcs-modules (cons 'mcs-xm (cons 'mcs-20 mcs-modules)))
 		(if (>= emacs-major-version 21)
-		    (setq pccl-modules '(pccl-20 pccl))
+		    (setq pccl-modules (cons 'pccl-20 pccl-modules))
 		  )
 		)
 	       ((>= emacs-major-version 20)
@@ -42,7 +41,7 @@
 							 poem-modules))
 		      mcs-modules (cons 'mcs-e20 (cons 'mcs-20
 						       mcs-modules))
-		      pccl-modules '(pccl-20 pccl))
+		      pccl-modules (cons 'pccl-20 pccl-modules))
 		(setq poem-modules
 		      (cons
 		       (if (and
@@ -55,7 +54,7 @@
 	       (t
 		(setq poem-modules (cons 'poem-om poem-modules)
 		      mcs-modules (cons 'mcs-om mcs-modules)
-		      pccl-modules '(pccl-om pccl)
+		      pccl-modules (cons 'pccl-om pccl-modules)
 		      emu-modules (cons 'emu-mule emu-modules))
 		))
 	 )