diff options
| author | Kenichi Handa <handa@m17n.org> | 2009-04-17 02:36:03 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2009-04-17 02:36:03 +0000 |
| commit | 88758986d503023e3304f2923a9460ed1a956d50 (patch) | |
| tree | ad1693c5955a782a146e96b5253be3b59cb6c7a5 /admin | |
| parent | 293a9e7a83f868c84368392595c4a55b1208a880 (diff) | |
| download | emacs-88758986d503023e3304f2923a9460ed1a956d50.tar.gz | |
(unidata-get-decomposition): Adjust Hangle decomposition rule to
Unicode.
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/ChangeLog | 5 | ||||
| -rw-r--r-- | admin/unidata/unidata-gen.el | 4 |
2 files changed, 8 insertions, 1 deletions
diff --git a/admin/ChangeLog b/admin/ChangeLog index 8e3a484f1f1..292ea24516c 100644 --- a/admin/ChangeLog +++ b/admin/ChangeLog @@ -1,3 +1,8 @@ +2009-04-17 Kenichi Handa <handa@m17n.org> + + * unidata/unidata-gen.el (unidata-get-decomposition): Adjust + Hangle decomposition rule to Unicode. + 2009-04-09 Kenichi Handa <handa@m17n.org> * unidata/unidata-gen.el (unidata-describe-decomposition): Return diff --git a/admin/unidata/unidata-gen.el b/admin/unidata/unidata-gen.el index 5a03fd71431..7fecb999d35 100644 --- a/admin/unidata/unidata-gen.el +++ b/admin/unidata/unidata-gen.el @@ -828,11 +828,13 @@ Property value is a character." (L (+ #x1100 (/ char 588))) ;; V = VBase + (SIndex % NCount) * TCount (V (+ #x1161 (/ (% char 588) 28))) + ;; LV = SBase + (SIndex / NCount) * NCount + (LV (+ #xAC00 (* (/ char 588) 588))) ;; T = TBase + SIndex % TCount (T (+ #x11A7 (% char 28)))) (if (= T #x11A7) (list L V) - (list L V T)))) + (list LV T)))) )) |