Make charprop.el provide a feature
* admin/unidata/unidata-gen.el (unidata-gen-charprop): Provide a feature. * lisp/loadup.el: Use the charprop feature.
This commit is contained in:
parent
efb4ea9987
commit
8f2062d96b
2 changed files with 7 additions and 4 deletions
|
@ -1450,7 +1450,10 @@ Property value is a symbol `o' (Open), `c' (Close), or `n' (None)."
|
|||
(unidata-prop-prop proplist) (car elt)
|
||||
(unidata-prop-docstring proplist)))))
|
||||
(or noninteractive (message "Writing %s..." charprop-file))
|
||||
(insert ";; Local Variables:\n"
|
||||
(insert "\n"
|
||||
"(provide 'charprop)\n"
|
||||
"\n"
|
||||
";; Local Variables:\n"
|
||||
";; coding: utf-8\n"
|
||||
";; version-control: never\n"
|
||||
";; no-byte-compile: t\n"
|
||||
|
|
|
@ -184,8 +184,8 @@
|
|||
(load "case-table")
|
||||
;; This file doesn't exist when building a development version of Emacs
|
||||
;; from the repository. It is generated just after temacs is built.
|
||||
(if ; this formatting is for the Makefile
|
||||
(load "international/charprop.el" t)
|
||||
(load "international/charprop.el" t)
|
||||
(if (featurep 'charprop)
|
||||
(setq redisplay--inhibit-bidi nil))
|
||||
(load "international/characters")
|
||||
(load "composite")
|
||||
|
@ -303,7 +303,7 @@
|
|||
;; Don't load ucs-normalize.el unless uni-*.el files were
|
||||
;; already produced, because it needs uni-*.el files that might
|
||||
;; not be built early enough during bootstrap.
|
||||
(when (load-history-filename-element "charprop\\.el")
|
||||
(when (featurep 'charprop)
|
||||
(load "international/mule-util")
|
||||
(load "international/ucs-normalize")
|
||||
(load "term/ns-win"))))
|
||||
|
|
Loading…
Add table
Reference in a new issue