[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/international/mule-conf.el,v
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/international/mule-conf.el,v |
Date: |
Fri, 23 May 2008 12:51:13 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Kenichi Handa <handa> 08/05/23 12:51:12
Index: mule-conf.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/international/mule-conf.el,v
retrieving revision 1.91
retrieving revision 1.92
diff -u -b -r1.91 -r1.92
--- mule-conf.el 6 May 2008 04:18:13 -0000 1.91
+++ mule-conf.el 23 May 2008 12:51:12 -0000 1.92
@@ -68,6 +68,14 @@
;; :ascii-compatible-p t
;; :code-offset 0)
;;
+;; (define-charset 'emacs
+;; ""
+;; :dimension 3
+;; :code-space [0 255 0 255 0 63]
+;; :ascii-compatible-p t
+;; :supplementary-p t
+;; :code-offset 0)
+;;
;; (define-charset 'eight-bit
;; ""
;; :dimension 1
@@ -94,18 +102,18 @@
'unicode :short-name "Unicode")
(put-charset-property
'unicode :long-name "Unicode (ISO10646)")
+(put-charset-property
+ 'emacs :docstring "Full Emacs charset (excluding eight bit chars)")
+(put-charset-property
+ 'emacs :short-name "Emacs")
+(put-charset-property
+ 'emacs :long-name "Emacs")
+
(put-charset-property 'eight-bit :docstring "Raw bytes 0-255")
(put-charset-property 'eight-bit :short-name "Raw bytes")
(define-charset-alias 'ucs 'unicode)
-(define-charset 'emacs
- "Full Emacs characters"
- :ascii-compatible-p t
- :code-space [ 0 255 0 255 0 63 ]
- :code-offset 0
- :supplementary-p t)
-
(define-charset 'latin-iso8859-1
"Right-Hand Part of ISO/IEC 8859/1 (Latin-1): ISO-IR-100"
:short-name "RHP of Latin-1"