diff options
| author | Kenichi Handa <handa@m17n.org> | 1997-08-18 10:54:31 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1997-08-18 10:54:31 +0000 |
| commit | 0d90569b84c067edfb4a7b4eb7810d50db542cd3 (patch) | |
| tree | 4dd8c8ef7339958adbe7a249d1fc85852ea88d36 /leim | |
| parent | b4195d3a085c4928fb6906b7b0d85dd2dd5a5f69 (diff) | |
| download | emacs-0d90569b84c067edfb4a7b4eb7810d50db542cd3.tar.gz | |
(quail-devanagari-compose-characters): Do
not call throw.
(quail-devanagari-hindi-compose-characters): Likewise.
Diffstat (limited to 'leim')
| -rw-r--r-- | leim/quail/devanagari.el | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/leim/quail/devanagari.el b/leim/quail/devanagari.el index 675bea0e124..ec35cd705b3 100644 --- a/leim/quail/devanagari.el +++ b/leim/quail/devanagari.el @@ -63,11 +63,8 @@ (delete-region (point-min) (point-max)) (insert (devanagari-compose-string dstr 'sanskrit)) (goto-char (point-max))) - (move-overlay quail-conv-overlay from (point)) - (setq unread-command-events (list last-command-event)) - (throw 'exit nil)) - (setq unread-command-events (list last-command-event)) - (throw 'exit nil))) + (move-overlay quail-conv-overlay from (point)))) + (setq unread-command-events (list last-command-event))) (quail-define-package "devanagari-keyboard-a" "Devanagari" "DevK" t @@ -478,11 +475,8 @@ Special Keys : Anuswar n' (delete-region (point-min) (point-max)) (insert (devanagari-compose-string dstr)) (goto-char (point-max))) - (move-overlay quail-conv-overlay from (point)) - (setq unread-command-events (list last-command-event)) - (throw 'exit nil)) - (setq unread-command-events (list last-command-event)) - (throw 'exit nil))) + (move-overlay quail-conv-overlay from (point)))) + (setq unread-command-events (list last-command-event))) (eval-when-compile |