From 45c9a0f754636bccb041c1414136546101e839a0 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Sat, 25 Sep 2004 02:08:41 +0000 Subject: [PATCH] (ucs-input-method): Add error clause to condition-case. --- leim/quail/uni-input.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/leim/quail/uni-input.el b/leim/quail/uni-input.el index 12b93dc19a6..6408eb13cc4 100644 --- a/leim/quail/uni-input.el +++ b/leim/quail/uni-input.el @@ -99,8 +99,9 @@ (ucs-input-insert-char key)) (let ((last-command-char key) (current-prefix-arg)) - (condition-case nil - (call-interactively (key-binding seq)))) + (condition-case err + (call-interactively (key-binding seq)) + (quail-error (message "%s" (cdr err)) (beep)))) (quail-delete-region) (throw 'non-digit (append (reverse events) (listify-key-sequence seq)))))) -- 2.39.2