diff options
| author | Dave Love | 2002-12-08 19:13:04 +0000 |
|---|---|---|
| committer | Dave Love | 2002-12-08 19:13:04 +0000 |
| commit | 63dc56a17692ff2f6f30831dfacfff29a041135d (patch) | |
| tree | 971e1ed587da977944d749618aa17be375862fe0 | |
| parent | ad7c69e78798a4531742e7ed98770fbe5ffb45fc (diff) | |
| download | emacs-63dc56a17692ff2f6f30831dfacfff29a041135d.tar.gz emacs-63dc56a17692ff2f6f30831dfacfff29a041135d.zip | |
(mule-diag): Move where it's
required.
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/international/code-pages.el | 7 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ed2a7af64a6..96526c9fc23 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,8 @@ | |||
| 1 | 2002-12-08 Dave Love <fx@gnu.org> | 1 | 2002-12-08 Dave Love <fx@gnu.org> |
| 2 | 2 | ||
| 3 | * international/code-pages.el (mule-diag): Move where it's | ||
| 4 | required. | ||
| 5 | |||
| 3 | * international/ucs-tables.el: Add latin-jisx0201 characters. Fix | 6 | * international/ucs-tables.el: Add latin-jisx0201 characters. Fix |
| 4 | translation-table-for-input for lao, thai, tibetan. | 7 | translation-table-for-input for lao, thai, tibetan. |
| 5 | 8 | ||
diff --git a/lisp/international/code-pages.el b/lisp/international/code-pages.el index 33975a6eb2f..3049ae5863c 100644 --- a/lisp/international/code-pages.el +++ b/lisp/international/code-pages.el | |||
| @@ -54,8 +54,6 @@ | |||
| 54 | 54 | ||
| 55 | ;;; Code: | 55 | ;;; Code: |
| 56 | 56 | ||
| 57 | (require 'mule-diag) ; for non-iso-charset-alist | ||
| 58 | |||
| 59 | (defun cp-make-translation-table (v) | 57 | (defun cp-make-translation-table (v) |
| 60 | "Return a translation table made from 128-long vector V. | 58 | "Return a translation table made from 128-long vector V. |
| 61 | V comprises characters encodable by mule-utf-8." | 59 | V comprises characters encodable by mule-utf-8." |
| @@ -152,6 +150,11 @@ read/written by MS-DOS software, or for display on the MS-DOS terminal." | |||
| 152 | cp (cp-charset-for-codepage cp) (cp-offset-for-codepage cp)))))) | 150 | cp (cp-charset-for-codepage cp) (cp-offset-for-codepage cp)))))) |
| 153 | ) ; eval-after-load | 151 | ) ; eval-after-load |
| 154 | 152 | ||
| 153 | ;; For `non-iso-charset-alist'. Do this after redefining | ||
| 154 | ;; `cp-supported-codepages', which is called through loading | ||
| 155 | ;; mule-diag. | ||
| 156 | (require 'mule-diag) | ||
| 157 | |||
| 155 | ;; Macro to allow ccl compilation at byte-compile time, avoiding | 158 | ;; Macro to allow ccl compilation at byte-compile time, avoiding |
| 156 | ;; loading ccl. | 159 | ;; loading ccl. |
| 157 | ;;;###autoload | 160 | ;;;###autoload |