diff options
| author | Kenichi Handa | 2002-07-30 06:34:28 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2002-07-30 06:34:28 +0000 |
| commit | 5470d5b60d08806420a204b082c91fa684db06c9 (patch) | |
| tree | 40b5d139e610cd61d2c41e9dd3f2bcefd0e7db88 | |
| parent | 01afb4f3ac01b890f2db3ccd453629115eed7dcb (diff) | |
| download | emacs-5470d5b60d08806420a204b082c91fa684db06c9.tar.gz emacs-5470d5b60d08806420a204b082c91fa684db06c9.zip | |
(safe-chars): Put `char-table-extra-slots' property with value 0.
| -rw-r--r-- | lisp/international/mule.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 7efcb9c1fb7..38817cde69c 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el | |||
| @@ -1099,6 +1099,8 @@ a value of `safe-charsets' in PLIST." | |||
| 1099 | 1099 | ||
| 1100 | coding-system) | 1100 | coding-system) |
| 1101 | 1101 | ||
| 1102 | (put 'safe-chars 'char-table-extra-slots 0) | ||
| 1103 | |||
| 1102 | (defun define-coding-system-alias (alias coding-system) | 1104 | (defun define-coding-system-alias (alias coding-system) |
| 1103 | "Define ALIAS as an alias for coding system CODING-SYSTEM." | 1105 | "Define ALIAS as an alias for coding system CODING-SYSTEM." |
| 1104 | (put alias 'coding-system (coding-system-spec coding-system)) | 1106 | (put alias 'coding-system (coding-system-spec coding-system)) |