X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=APEL-ELS;h=98de7e6a6187dd1218b5344476753754eda5a0f5;hb=49556b1eb338487d82a3c463aa583e9d13fda6b2;hp=16e681648ff3722f7ca8f6f14b3159f5af969bdb;hpb=06ff6d53e10772fc6d985e9a4bd14ceda595baee;p=elisp%2Fapel.git

diff --git a/APEL-ELS b/APEL-ELS
index 16e6816..98de7e6 100644
--- a/APEL-ELS
+++ b/APEL-ELS
@@ -1,41 +1,19 @@
-;;; -*-Emacs-Lisp-*-
+;;; APEL-ELS --- list of APEL modules to install. -*-Emacs-Lisp-*-
 
-;; APEL-ELS: list of APEL modules to install
+;;; Commentary:
+
+;; APEL-MK imports `apel-modules' from here.
 
 ;;; Code:
 
-(setq apel-modules '(product apel-ver
-			     alist calist
-			     path-util filename install
-			     mule-caesar
-			     
+(defvar apel-modules '(alist calist path-util filename install
+			     ;; "mule-caesar" is version-dependent.
+			     ;; moved to EMU-ELS.
+			     ;; mule-caesar
+
 			     ;; [obsoleted modules] If you would like to
 			     ;; install following, please activate them.
-
 			     ;; atype file-detect
 			     ))
 
-(if (or (< emacs-major-version 19)
-	(and (eq emacs-major-version 19) (< emacs-minor-version 16)))
-    (setq apel-modules (cons 'time-stamp apel-modules))
-  )
-
-(condition-case nil
-    (let ((load-path (delete (expand-file-name ".")
-                             (copy-sequence load-path))))
-      ;; v18 does not have timezone.el.
-      (require 'timezone)
-      ;; Is timezone.el APEL version?
-      (if (product-find 'timezone)
-	  (error "timezone.el is APEL version. Install newer version."))
-      ;; Y2K test.
-      (or (string= (aref (timezone-parse-date "Sat, 1 Jan 00 00:00:00 GMT")
-                         0)
-                   "2000")
-	  (error "timezone.el has Y2K problem. Install fixed version."))
-      ;; another test here.
-      )
-  (error
-   (setq apel-modules (cons 'timezone apel-modules))))
-
 ;;; APEL-ELS ends here