projects
/
elisp
/
apel.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Warn if the new custom library is not found at the compile time.
[elisp/apel.git]
/
EMU-ELS
diff --git
a/EMU-ELS
b/EMU-ELS
index
4d14252
..
a6ceb82
100644
(file)
--- a/
EMU-ELS
+++ b/
EMU-ELS
@@
-17,6
+17,10
@@
'(richtext)
'(tinyrich))))
'(richtext)
'(tinyrich))))
+(setq emu-modules-to-compile nil)
+
+(setq emu-modules-not-to-compile nil)
+
(setq pcustom-modules (if (and (module-installed-p 'custom)
;; new custom requires widget.
(module-installed-p 'widget))
(setq pcustom-modules (if (and (module-installed-p 'custom)
;; new custom requires widget.
(module-installed-p 'widget))
@@
-46,7
+50,7
@@
invisible-modules (cons 'inv-18 invisible-modules))
))
(cond ((featurep 'xemacs)
invisible-modules (cons 'inv-18 invisible-modules))
))
(cond ((featurep 'xemacs)
- (if (or (featurep 'mule) (featurep 'file-coding))
+ (if (featurep 'file-coding)
(setq pces-modules (cons 'pces-xfc (cons 'pces-20 pces-modules)))
)
(if (featurep 'mule)
(setq pces-modules (cons 'pces-xfc (cons 'pces-20 pces-modules)))
)
(if (featurep 'mule)
@@
-75,7
+79,11
@@
(cond ((featurep 'mule)
(cond ((featurep 'xemacs)
(setq poem-modules (cons 'poem-xm poem-modules)
(cond ((featurep 'mule)
(cond ((featurep 'xemacs)
(setq poem-modules (cons 'poem-xm poem-modules)
- mcs-modules (cons 'mcs-xm (cons 'mcs-20 mcs-modules)))
+ mcs-modules (append '(mcs-xmu mcs-xm mcs-20)
+ mcs-modules))
+ (if (featurep 'utf-2000)
+ (setq emu-modules-not-to-compile
+ (cons 'mcs-xmu emu-modules-not-to-compile)))
(if (>= emacs-major-version 21)
(setq pccl-modules (cons 'pccl-20 pccl-modules))
))
(if (>= emacs-major-version 21)
(setq pccl-modules (cons 'pccl-20 pccl-modules))
))
@@
-118,4
+126,14
@@
(setq emu-modules (cons 'static emu-modules))
)
(setq emu-modules (cons 'static emu-modules))
)
+(let ((modules emu-modules)
+ module)
+ (while modules
+ (setq module (car modules)
+ modules (cdr modules))
+ (if (memq module emu-modules-not-to-compile)
+ nil
+ (setq emu-modules-to-compile (nconc emu-modules-to-compile
+ (list module))))))
+
;;; EMU-ELS ends here
;;; EMU-ELS ends here