[Emacs-diffs] Changes to emacs/lisp/international/mule.el

[Dave Love]

Index: emacs/lisp/international/mule.el
diff -c emacs/lisp/international/mule.el:1.189 
emacs/lisp/international/mule.el:1.190
*** emacs/lisp/international/mule.el:1.189      Mon Aug 18 08:37:41 2003
--- emacs/lisp/international/mule.el    Wed Aug 20 14:56:53 2003
***************
*** 815,820 ****
--- 815,825 ----
    The value is a symbol whose name is the `MIME-charset' parameter of
    the coding system.
  
+   o mime-text-unsuitable
+ 
+   A non-nil value means the `mime-charset' property names a charset
+   which is unsuitable for the top-level media type \"text\".
+ 
    o valid-codes (meaningful only for a coding system based on CCL)
  
    The value is a list to indicate valid byte ranges of the encoded
***************
*** 1124,1130 ****
  leaves the end-of-line conversion unspecified, FORCE controls what to
  do.  If FORCE is nil, get the unspecified aspect (or aspects) from the
  buffer's previous `buffer-file-coding-system' value (if it is
! specified there).  Otherwise, levae it unspecified.
  
  This marks the buffer modified so that the succeeding \\[save-buffer]
  surely saves the buffer with CODING-SYSTEM.  From a program, if you
--- 1129,1135 ----
  leaves the end-of-line conversion unspecified, FORCE controls what to
  do.  If FORCE is nil, get the unspecified aspect (or aspects) from the
  buffer's previous `buffer-file-coding-system' value (if it is
! specified there).  Otherwise, leave it unspecified.
  
  This marks the buffer modified so that the succeeding \\[save-buffer]
  surely saves the buffer with CODING-SYSTEM.  From a program, if you
***************
*** 1379,1384 ****
--- 1384,1415 ----
            (decode-coding-region (- (point) bytes) (point) 'utf-8))))
        (goto-char (point-min))
        (- (point-max) (point)))))
+ 
+ ;; From X registry 2001/06/01
+ ;; 20. NON-STANDARD CHARACTER SET ENCODINGS
+ 
+ ;; See Section 6 of the Compound Text standard.
+ 
+ ;; Name                                               Reference
+ ;; ----                                               ---------
+ ;; "DEC.CNS11643.1986-2"                              [53]
+ ;;    CNS11643 2-plane using the recommended
+ ;;    internal representation scheme
+ ;; "DEC.DTSCS.1990-2"                         [54]
+ ;;    DEC Taiwan Supplemental Character Set
+ ;; "fujitsu.u90x03"                           [87]
+ ;; "ILA"                                              [62]
+ ;;    registry prefix
+ ;; "IPSYS"                                            [59]
+ ;;    registry prefix
+ ;; "omron_UDC"                                        [45]
+ ;;         omron User Defined Charset
+ ;; "omron_UDC_ja"                                     [45]
+ ;;         omron User Defined Charset for Japanese
+ ;; "omron_UDC_zh"                                     [45]
+ ;;         omron User Defined Charset for Chinese(Main land)
+ ;; "omron_UDC_tw"                                     [45]
+ ;;         omron User Defined Charset for Chinese(Taiwan)
  
  ;; If you add charsets here, be sure to modify the regexp used by
  ;; ctext-pre-write-conversion to look up non-standard charsets.