APEL-ELS

   1 ;;; -*-Emacs-Lisp-*-
   2
   3 ;; APEL-ELS: list of APEL modules to install
   4
   5 ;;; Code:
   6
   7 (setq apel-modules '(product apel-ver
   8                              alist calist
   9                              path-util filename install
  10                              mule-caesar
  11
  12                              ;; [obsoleted modules] If you would like to
  13                              ;; install following, please activate them.
  14
  15                              ;; atype file-detect
  16                              ))
  17
  18 (if (or (< emacs-major-version 19)
  19         (and (eq emacs-major-version 19) (< emacs-minor-version 16)))
  20     (setq apel-modules (cons 'time-stamp apel-modules))
  21   )
  22
  23 (condition-case nil
  24     (let ((load-path (delete (expand-file-name ".")
  25                              (copy-sequence load-path))))
  26       ;; v18 does not have timezone.el.
  27       (require 'timezone)
  28       ;; Is timezone.el APEL version?
  29       (if (product-find 'timezone)
  30           (error "timezone.el is APEL version. Install newer version."))
  31       ;; Y2K test.
  32       (or (string= (aref (timezone-parse-date "Sat, 1 Jan 00 00:00:00 GMT")
  33                          0)
  34                    "2000")
  35           (error "timezone.el has Y2K problem. Install fixed version."))
  36       ;; another test here.
  37       )
  38   (error
  39    (setq apel-modules (cons 'timezone apel-modules))))
  40
  41 ;;; APEL-ELS ends here