1224 |
(if (= len 1) |
(if (= len 1) |
1225 |
(setq subst (aref indian-2-column-to-ucs-chartable |
(setq subst (aref indian-2-column-to-ucs-chartable |
1226 |
(char-after (match-beginning 0)))) |
(char-after (match-beginning 0)))) |
1227 |
(setq subst (assoc (match-string 0) alist))) |
(setq subst (cdr (assoc (match-string 0) alist)))) |
1228 |
(replace-match (if subst subst "?")))) |
(replace-match (if subst subst "?")))) |
1229 |
(indian-compose-region (point-min) (point-max)))))) |
(indian-compose-region (point-min) (point-max)))))) |
1230 |
|
|