diff options
| author | Kenichi Handa | 2005-05-12 01:49:40 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2005-05-12 01:49:40 +0000 |
| commit | d636247a15352b3c1a074385063c6f7c4deac882 (patch) | |
| tree | 0a4b952c538c77ca552398cd16dc3c22cfd7780f /admin | |
| parent | 8f793978651e33f7436ff01348ef2a04126ab9da (diff) | |
| download | emacs-d636247a15352b3c1a074385063c6f7c4deac882.tar.gz emacs-d636247a15352b3c1a074385063c6f7c4deac882.zip | |
(unidata-get-decomposition): For Hangul
decomposition, if T is the same as TBase, don't include it in the
returned list.
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/unidata/unidata-gen.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/admin/unidata/unidata-gen.el b/admin/unidata/unidata-gen.el index f08ddc68b27..75d7e2d98fa 100644 --- a/admin/unidata/unidata-gen.el +++ b/admin/unidata/unidata-gen.el | |||
| @@ -773,7 +773,9 @@ Property value is a character." | |||
| 773 | (V (+ #x1161 (/ (% char 588) 28))) | 773 | (V (+ #x1161 (/ (% char 588) 28))) |
| 774 | ;; T = TBase + SIndex % TCount | 774 | ;; T = TBase + SIndex % TCount |
| 775 | (T (+ #x11A7 (% char 28)))) | 775 | (T (+ #x11A7 (% char 28)))) |
| 776 | (list L V T))) | 776 | (if (= T #x11A7) |
| 777 | (list L V) | ||
| 778 | (list L V T)))) | ||
| 777 | 779 | ||
| 778 | )) | 780 | )) |
| 779 | 781 | ||