# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1255654047 0
# Node ID 4b7680ee254cde5e6bb5984d305295a3908700f0
# Parent  00238321fb14aec801ff87447ba01062af000df1
(ucs-normalize-version): Changed to 1.2.
(check-range): Adjusted for Unicode 5.2.

diff -r 00238321fb14 -r 4b7680ee254c lisp/international/ucs-normalize.el
--- 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)