mule.el (coding-system-iso-2022-flags): Change 8-bit-level-4'

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ccc27f71ac8dc3332e76d46b2231c64ea9f0e906..4b6d0b0e3798b9379c0f907f1da67b139521631b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,7 +1,7 @@
 2013-07-20  Kenichi Handa  <handa@gnu.org>
 
        * international/mule.el (coding-system-iso-2022-flags): Add
-       `level-4'.  (Bug#8522)
+       `8-bit-level-4'.  (Bug#8522)
 
 2013-07-18  Michael Albinus  <michael.albinus@gmx.de>
 

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 45f74217ad2cf3ad2a53b2681cd546a31a1bc215..ea2a0da4abba407f9d34118d3ea92bce0b00c46a 100644 (file)
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -543,8 +543,9 @@ If `locking-shift' is specified, decode locking-shift code correctly
 on decoding, and use locking-shift to invoke a graphic element on
 encoding.
 
-If `single-shift' is specified, decode single-shift code correctly on
-decoding, and use single-shift to invoke a graphic element on encoding.
+If `single-shift' is specified, decode single-shift code
+correctly on decoding, and use single-shift to invoke a graphic
+element on encoding.  See also `8-bit-level-4' specification.
 
 If `designation' is specified, decode designation code correctly on
 decoding, and use designation to designate a charset to a graphic
@@ -581,11 +582,11 @@ of ASCII.
 If `use-oldjis' is specified, JIS0208-1976 is designated instead of
 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.")
+If `8-bit-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.