diff options
author | Glenn Morris <rgm@gnu.org> | 2015-05-15 18:33:09 -0400 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2015-05-15 18:33:09 -0400 |
commit | c7e93c41078193d4df8ca165d3aea50a51c40519 (patch) | |
tree | 3df4b4941a8e47100142d22a312c506cefe5fda3 | |
parent | b00168e833ccca1b5c0eebe56688ec44e0efabe7 (diff) | |
download | emacs-c7e93c41078193d4df8ca165d3aea50a51c40519.tar.gz |
Tweak japanese.el's loading of dependencies.
* lisp/loadup.el: Explicitly load cp51932 and eucjp-ms.
* lisp/language/japanese.el: Use require rather than load.
* lisp/international/cp51932.el, lisp/international/eucjp-ms.el:
Provide a feature.
* admin/charsets/eucjp-ms.awk, admin/charsets/cp51932.awk:
Provide a feature in the generated file.
-rw-r--r-- | admin/charsets/cp51932.awk | 2 | ||||
-rw-r--r-- | admin/charsets/eucjp-ms.awk | 2 | ||||
-rw-r--r-- | lisp/international/cp51932.el | 2 | ||||
-rw-r--r-- | lisp/international/eucjp-ms.el | 2 | ||||
-rw-r--r-- | lisp/language/japanese.el | 4 | ||||
-rw-r--r-- | lisp/loadup.el | 2 | ||||
-rw-r--r-- | src/lisp.mk | 6 |
7 files changed, 13 insertions, 7 deletions
diff --git a/admin/charsets/cp51932.awk b/admin/charsets/cp51932.awk index c8879b30200..f59e91cdb9c 100644 --- a/admin/charsets/cp51932.awk +++ b/admin/charsets/cp51932.awk @@ -52,4 +52,6 @@ END { print " (setcar x (cdr x)) (setcdr x tmp)))"; print " map)"; print " (define-translation-table 'cp51932-encode map))"; + print ""; + print "(provide 'cp51932)"; } diff --git a/admin/charsets/eucjp-ms.awk b/admin/charsets/eucjp-ms.awk index 18c19f5fb55..f17222d901e 100644 --- a/admin/charsets/eucjp-ms.awk +++ b/admin/charsets/eucjp-ms.awk @@ -106,5 +106,7 @@ END { print " (setcar x (cdr x)) (setcdr x tmp)))"; print " map)"; print " (define-translation-table 'eucjp-ms-encode map))"; + print ""; + print "(provide 'eucjp-ms)"; } diff --git a/lisp/international/cp51932.el b/lisp/international/cp51932.el index a6489268578..cb72356fea0 100644 --- a/lisp/international/cp51932.el +++ b/lisp/international/cp51932.el @@ -468,3 +468,5 @@ (setcar x (cdr x)) (setcdr x tmp))) map) (define-translation-table 'cp51932-encode map)) + +(provide 'cp51932) diff --git a/lisp/international/eucjp-ms.el b/lisp/international/eucjp-ms.el index 6e4e1e798b0..efb0a2b2d75 100644 --- a/lisp/international/eucjp-ms.el +++ b/lisp/international/eucjp-ms.el @@ -2085,3 +2085,5 @@ (setcar x (cdr x)) (setcdr x tmp))) map) (define-translation-table 'eucjp-ms-encode map)) + +(provide 'eucjp-ms) diff --git a/lisp/language/japanese.el b/lisp/language/japanese.el index ce480252e7c..38159d7b458 100644 --- a/lisp/language/japanese.el +++ b/lisp/language/japanese.el @@ -34,8 +34,8 @@ ;;; Code: ;;; Load translation tables for CP932. -(load "international/cp51932") -(load "international/eucjp-ms") +(require 'cp51932) +(require 'eucjp-ms) (define-coding-system 'iso-2022-jp "ISO 2022 based 7bit encoding for Japanese (MIME:ISO-2022-JP)." diff --git a/lisp/loadup.el b/lisp/loadup.el index 828b19e85e3..525cbad9db7 100644 --- a/lisp/loadup.el +++ b/lisp/loadup.el @@ -178,6 +178,8 @@ (load "language/romanian") (load "language/greek") (load "language/hebrew") +(load "international/cp51932") +(load "international/eucjp-ms") (load "language/japanese") (load "language/korean") (load "language/lao") diff --git a/src/lisp.mk b/src/lisp.mk index 8eb86b7429e..0a431a59d7d 100644 --- a/src/lisp.mk +++ b/src/lisp.mk @@ -34,10 +34,6 @@ ## that does not have an explicit .el extension, but beware of any ## no-byte-compile ones. -## Confusingly, international/cp51932 and international/eucjp-ms are -## unconditionally loaded from language/japanese, instead of being -## loaded directly from loadup.el; FIXME. - ## Note that this list should not include lisp files which might not ## be present, like site-load.el and site-init.el; this makefile ## expects them all to be either present or buildable. @@ -96,9 +92,9 @@ lisp = \ $(lispsource)/language/romanian.elc \ $(lispsource)/language/greek.elc \ $(lispsource)/language/hebrew.elc \ - $(lispsource)/language/japanese.elc \ $(lispsource)/international/cp51932.el \ $(lispsource)/international/eucjp-ms.el \ + $(lispsource)/language/japanese.elc \ $(lispsource)/language/korean.elc \ $(lispsource)/language/lao.elc \ $(lispsource)/language/tai-viet.elc \ |