diff options
| author | Juri Linkov <juri@jurta.org> | 2011-11-22 01:59:09 +0200 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2011-11-22 01:59:09 +0200 |
| commit | f2a0aa3ae931cb4566792457de9392f374d1dbc6 (patch) | |
| tree | a3723874e0da7dce00745f9fedc29d3be326d860 /lisp/calc | |
| parent | 252f26e9c26990ef9da51513b45b5eb806dd3ed7 (diff) | |
| download | emacs-f2a0aa3ae931cb4566792457de9392f374d1dbc6.tar.gz emacs-f2a0aa3ae931cb4566792457de9392f374d1dbc6.tar.bz2 emacs-f2a0aa3ae931cb4566792457de9392f374d1dbc6.zip | |
* lisp/calc/calc.el (calc-read-key-sequence): Let-bind `input-method-function' to nil.
Fixes: debbugs:10018
Diffstat (limited to 'lisp/calc')
| -rw-r--r-- | lisp/calc/calc.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index 60a84bdff35..626d2462b4f 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 |