Mercurial > emacs
changeset 105620:4b7680ee254c
(ucs-normalize-version): Changed to 1.2.
(check-range): Adjusted for Unicode 5.2.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Fri, 16 Oct 2009 00:47:27 +0000 |
| parents | 00238321fb14 |
| children | 2a7dac6bff40 |
| files | lisp/international/ucs-normalize.el |
| diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/ucs-normalize.el Thu Oct 15 22:23:11 2009 +0000 +++ b/lisp/international/ucs-normalize.el Fri Oct 16 00:47:27 2009 +0000 @@ -23,7 +23,7 @@ ;;; Commentary: ;; -;; This program has passed the NormalizationTest-5.1.0.txt. +;; This program has passed the NormalizationTest-5.2.0.txt. ;; ;; References: ;; http://www.unicode.org/reports/tr15/ @@ -108,7 +108,7 @@ ;;; Code: -(defconst ucs-normalize-version "1.1") +(defconst ucs-normalize-version "1.2") (eval-when-compile (require 'cl)) @@ -130,11 +130,11 @@ #x1D1BF #x1D1C0) "Composition Exclusion List. This list is taken from - http://www.unicode.org/Public/UNIDATA/CompositionExclusions-5.1.0.txt") + http://www.unicode.org/Public/UNIDATA/5.2/CompositionExclusions.txt") ;; Unicode ranges that decompositions & combinings are defined. (defvar check-range nil) - (setq check-range '((#x00a0 . #x3400) (#xA600 . #xAC00) (#xF900 . #x10fff) (#x1d000 . #x1dfff) (#x2f800 . #x2faff))) + (setq check-range '((#x00a0 . #x3400) (#xA600 . #xAC00) (#xF900 . #x110ff) (#x1d000 . #x1dfff) (#x1f100 . #x1f2ff) (#x2f800 . #x2faff))) ;; Basic normalization functions (defun nfd (char)