1 |
;;; devan-util.el --- Support for composing Devanagari characters |
;;; devan-util.el --- Support for composing Devanagari characters -*-coding: iso2022-7bit;-*- |
2 |
|
|
3 |
;; Copyright (C) 2001 Free Software Foundation, Inc. |
;; Copyright (C) 2001 Free Software Foundation, Inc. |
4 |
|
|
110 |
;; Register a function to compose Devanagari characters. |
;; Register a function to compose Devanagari characters. |
111 |
(mapc |
(mapc |
112 |
(function (lambda (ucs) |
(function (lambda (ucs) |
113 |
(aset composition-function-table (decode-char 'ucs ucs) |
(aset composition-function-table ucs |
114 |
(list (cons devanagari-composable-pattern |
(list (cons devanagari-composable-pattern |
115 |
'devanagari-composition-function))))) |
'devanagari-composition-function))))) |
116 |
(nconc '(#x0903) (devanagari-range #x0905 #x0939) (devanagari-range #x0958 #x0961))) |
(nconc '(#x0903) (devanagari-range #x0905 #x0939) (devanagari-range #x0958 #x0961))) |