X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=EMU-ELS;h=20cb83771f4d7f77650d948fd05c7367acc4e894;hb=ebf5fdb7389e5e13d0923cfcd5065df1ac35b90d;hp=542d2ce55210eaafb09a7cf94a2f37c0db5c2f67;hpb=329d74bc1c29d86ed90919c4b0746a121ed5e80a;p=elisp%2Fapel.git

diff --git a/EMU-ELS b/EMU-ELS
index 542d2ce..20cb837 100644
--- a/EMU-ELS
+++ b/EMU-ELS
@@ -50,18 +50,24 @@
 
    ;; pccl modules; pccl modules depend on broken.
    (cond
-    ((featurep 'mule)
+    ((featurep 'xemacs)
      (cond
       ;; XEmacs 21 w/ mule.
-      ((and (featurep 'xemacs)
+      ((and (featurep 'mule)
 	    (>= emacs-major-version 21))
        '(pccl-20 pccl))
+      (t
+       '(pccl))))
+    ((featurep 'mule)
+     (cond
       ;; Emacs 20.
       ((>= emacs-major-version 20)
        '(pccl-20 pccl))
+      ;; Mule 1.* and 2.*.
       (t
-       ;; Mule 1.* and 2.*.
-       '(pccl-om pccl)))))
+       '(pccl-om pccl))))
+    (t
+     '(pccl)))
 
    ;; pces modules; pces modules depend on poe.
    (cond
@@ -167,6 +173,12 @@
 			    0)
 		      "2000")
 	     (error "timezone.el has Y2K problem. Install fixed version."))
+	 ;; Old parser test.
+	 (if (string=
+	      (aref (timezone-parse-date "Wednesday, 31-Jan-01 09:00:00 GMT")
+		    0)
+	      "0")
+	     (error "timezone.el has old date parser. Install fixed version."))
 	 ;; no problem.
 	 '())
      (error