procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(devanagari-reorder-glyphs-for-decomposition): Fix the way to

Browse source 
handle devanagari-decomposition-rules.
This commit is contained in:
Kenichi Handa 1998-12-15 04:35:38 +00:00
parent edf496dd13
commit ebcc4e2e77
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/language/devan-util.el
View file

@ -1166,8 +1166,8 @@ Ligatures and special rules are processed."
"This function re-orders glyph list for decomposition."
(sort glyphlist
'(lambda (x y)
(let ((xx (assoc x devanagari-decomposition-rules))
(yy (assoc y devanagari-decomposition-rules)))
(let ((xx (nth 1 (assoc x devanagari-decomposition-rules)))
(yy (nth 1 (assoc y devanagari-decomposition-rules))))
(if (null xx) (setq xx 0))
(if (null yy) (setq yy 0))
(< xx yy)))))