;;; APEL-ELS --- list of APEL modules to install. -*-Emacs-Lisp-*- ;;; Commentary: ;; APEL-MK imports `apel-modules' from here. ;;; Code: (defvar apel-modules '(product apel-ver 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