diff options
-rw-r--r-- | lisp/language/devan-util.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/language/devan-util.el b/lisp/language/devan-util.el index 38b56f8919..cbc5b19a56 100644 --- a/lisp/language/devan-util.el +++ b/lisp/language/devan-util.el @@ -427,7 +427,7 @@ Default value contains only the basic rules. You may add your own preferred rule from the sanskrit fonts." ) (defvar dev-char-glyph-hash - (let* ((hash (makehash 'equal))) + (let* ((hash (make-hash-table :test 'equal))) (mapc (function (lambda (x) (puthash (car x) (cdr x) hash))) dev-char-glyph) hash)) @@ -468,7 +468,7 @@ preferred rule from the sanskrit fonts." ) ("\$,4"L(B\$,4"'(B\$,4"&(B" . "\$,4"O(B") )) (defvar dev-glyph-glyph-hash - (let* ((hash (makehash 'equal))) + (let* ((hash (make-hash-table :test 'equal))) (mapc (function (lambda (x) (puthash (car x) (cdr x) hash))) dev-glyph-glyph) hash)) @@ -483,7 +483,7 @@ preferred rule from the sanskrit fonts." ) ("$,4",(B" . "$,4"0(B") ("$,4"-(B" . "$,4"1(B"))) (defvar dev-glyph-glyph-2-hash - (let* ((hash (makehash 'equal))) + (let* ((hash (make-hash-table :test 'equal))) (mapc (function (lambda (x) (puthash (car x) (cdr x) hash))) dev-glyph-glyph-2) hash)) |