From: morioka <morioka>
Date: Sun, 11 Oct 1998 07:11:12 +0000 (+0000)
Subject: Don't install pccl in anything older than XEmacs 21 with MULE.
X-Git-Tag: apel-9_3~7
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=bfa2e1c9110ff83ea8513a5f19688666510981a8;p=elisp%2Fapel.git

Don't install pccl in anything older than XEmacs 21 with MULE.
---

diff --git a/EMU-ELS b/EMU-ELS
index b021714..3ffe0d1 100644
--- a/EMU-ELS
+++ b/EMU-ELS
@@ -24,20 +24,20 @@
 			  poe-modules))
   
   (cond ((featurep 'mule)
-	 (setq pccl-modules '(pccl))
 	 (cond ((featurep 'xemacs)
 		(setq poem-modules (cons 'poem-xm (cons 'poem-20
 							poem-modules))
-		      mcs-modules (cons 'mcs-xm (cons 'mcs-20 mcs-modules))
-		      pccl-modules (cons 'pccl-20 pccl-modules))
+		      mcs-modules (cons 'mcs-xm (cons 'mcs-20 mcs-modules)))
+		(if (>= emacs-major-version 21)
+		    (setq pccl-modules '(pccl-20 pccl))
+		  )
 		)
 	       ((>= emacs-major-version 20)
 		(setq poem-modules (cons 'poem-e20 (cons 'poem-20
 							 poem-modules))
 		      mcs-modules (cons 'mcs-e20 (cons 'mcs-20
 						       mcs-modules))
-		      pccl-modules (cons 'pccl-20 pccl-modules))
-
+		      pccl-modules '(pccl-20 pccl))
 		(setq poem-modules
 		      (cons
 		       (if (and
@@ -50,7 +50,7 @@
 	       (t
 		(setq poem-modules (cons 'poem-om poem-modules)
 		      mcs-modules (cons 'mcs-om mcs-modules)
-		      pccl-modules (cons 'pccl-om pccl-modules)
+		      pccl-modules '(pccl-om pccl)
 		      emu-modules (cons 'emu-mule emu-modules))
 		))
 	 )