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

handle devanagari-decomposition-rules.

(devanagari-reorder-glyphs-for-decomposition): Fix the way to
handle devanagari-decomposition-rules.
ebcc4e2e · Kenichi Handa · edf496dd · ebcc4e2e
Commit ebcc4e2e authored Dec 15, 1998 by Kenichi Handa
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/language/devan-util.el lisp/language/devan-util.el +2 -2

No files found.
--- a/lisp/language/devan-util.el
+++ b/lisp/language/devan-util.el
@@ -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)))))