;; 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
(t
'(mcs-ltn1 mcharset)))
- ;; time-stamp.el; First appeared in Emacs 19.16.
- (if (and (not (featurep 'xemacs))
- (or (< emacs-major-version 19)
- (and (= emacs-major-version 19)
- (< emacs-minor-version 16))))
- '(time-stamp)
- ;; no problem.
- '())
-
;; timezone.el; Some versions have Y2K problem.
(condition-case nil
(let ((load-path (delete (expand-file-name ".")
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
((featurep 'xemacs)
;; XEmacs.
'(inv-xemacs invisible))
+ ((>= emacs-major-version 23)
+ ;; Emacs 23 and later
+ '(inv-23 invisible))
((>= emacs-major-version 19)
;; Emacs 19 and later.
'(inv-19 invisible))