diff options
| author | Kenichi Handa <handa@gnu.org> | 2013-07-20 13:15:37 +0900 |
|---|---|---|
| committer | Kenichi Handa <handa@gnu.org> | 2013-07-20 13:15:37 +0900 |
| commit | eaaa8f3ea145176bd0168e5ed6e19044a1a9e014 (patch) | |
| tree | dd449259bc6f4b045d1e7cb44417e9de7f4bd669 /lisp/international | |
| parent | abd2f2a44e9225cdc89dc6643190dd13785bb48e (diff) | |
| download | emacs-eaaa8f3ea145176bd0168e5ed6e19044a1a9e014.tar.gz | |
* mule.el (coding-system-iso-2022-flags): Add `level-4'. (Bug#8522)
Diffstat (limited to 'lisp/international')
| -rw-r--r-- | lisp/international/mule.el | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 28542835a5f..45f74217ad2 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -518,7 +518,8 @@ Return -1 if charset isn't an ISO 2022 one." composition euc-tw-shift use-roman - use-oldjis) + use-oldjis + level-4) "List of symbols that control ISO-2022 encoder/decoder. The value of the `:flags' attribute in the argument of the function @@ -578,7 +579,13 @@ If `use-roman' is specified, JIS0201-1976-Roman is designated instead of ASCII. If `use-oldjis' is specified, JIS0208-1976 is designated instead of -JIS0208-1983.") +JIS0208-1983. + +If `level-4' is specified, the decoder assumes the implementation +lavel \"4\" for 8-bit codes which means that GL is identified as the +single-shift area. The default implementation level for 8-bit +code is \"4A\" which means that GR is identified as the +single-shift area.") (defun define-coding-system (name docstring &rest props) "Define NAME (a symbol) as a coding system with DOCSTRING and attributes. |