From f2a0aa3ae931cb4566792457de9392f374d1dbc6 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Tue, 22 Nov 2011 01:59:09 +0200 Subject: * lisp/calc/calc.el (calc-read-key-sequence): Let-bind `input-method-function' to nil. Fixes: debbugs:10018 --- lisp/calc/calc.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp/calc') diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index 60a84bdff3..626d2462b4 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el @@ -1235,7 +1235,8 @@ Used by `calc-user-invocation'.") (glob (current-global-map)) (loc (current-local-map))) (or (input-pending-p) (message "%s" prompt)) - (let ((key (calc-read-key t))) + (let ((key (calc-read-key t)) + (input-method-function nil)) (calc-unread-command (cdr key)) (unwind-protect (progn -- cgit v1.2.3