diff options
| author | Kenichi Handa | 2003-04-10 11:57:54 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2003-04-10 11:57:54 +0000 |
| commit | 20412adcc246a6baf74f1b454b00d3c478beac96 (patch) | |
| tree | 90fde53d3af1600ce55f19b22e56389a57d31559 | |
| parent | 92464ae63f6bae0f1cf889389548ec51a2ff36dc (diff) | |
| download | emacs-20412adcc246a6baf74f1b454b00d3c478beac96.tar.gz emacs-20412adcc246a6baf74f1b454b00d3c478beac96.zip | |
(indian-2-column-to-ucs-region): Fix for
the case of replacing multibyte characters.
| -rw-r--r-- | lisp/language/ind-util.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/language/ind-util.el b/lisp/language/ind-util.el index c408655e6cd..8885960dff8 100644 --- a/lisp/language/ind-util.el +++ b/lisp/language/ind-util.el | |||
| @@ -1224,7 +1224,7 @@ Returns new end position." | |||
| 1224 | (if (= len 1) | 1224 | (if (= len 1) |
| 1225 | (setq subst (aref indian-2-column-to-ucs-chartable | 1225 | (setq subst (aref indian-2-column-to-ucs-chartable |
| 1226 | (char-after (match-beginning 0)))) | 1226 | (char-after (match-beginning 0)))) |
| 1227 | (setq subst (assoc (match-string 0) alist))) | 1227 | (setq subst (cdr (assoc (match-string 0) alist)))) |
| 1228 | (replace-match (if subst subst "?")))) | 1228 | (replace-match (if subst subst "?")))) |
| 1229 | (indian-compose-region (point-min) (point-max)))))) | 1229 | (indian-compose-region (point-min) (point-max)))))) |
| 1230 | 1230 | ||