[Emacs-diffs] /srv/bzr/emacs/trunk r106468: * lisp/calc/calc.el (calc-read-key-sequence): Let-bind `input-method-function' to nil.

[Juri Linkov]

------------------------------------------------------------
revno: 106468
fixes bug(s): http://debbugs.gnu.org/10018
committer: Juri Linkov <address@hidden>
branch nick: trunk
timestamp: Tue 2011-11-22 01:59:09 +0200
message:
  * lisp/calc/calc.el (calc-read-key-sequence): Let-bind 
`input-method-function' to nil.
modified:
  lisp/ChangeLog
  lisp/calc/calc.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-11-21 21:58:38 +0000
+++ b/lisp/ChangeLog    2011-11-21 23:59:09 +0000
@@ -1,3 +1,8 @@
+2011-11-21  Juri Linkov  <address@hidden>
+
+       * calc/calc.el (calc-read-key-sequence): Let-bind 
`input-method-function'
+       to nil.  (Bug#10018)
+
 2011-11-21  Lars Magne Ingebrigtsen  <address@hidden>
 
        * emacs-lisp/cl-indent.el (common-lisp-loop-part-indentation):

=== modified file 'lisp/calc/calc.el'
--- a/lisp/calc/calc.el 2011-11-15 17:37:37 +0000
+++ b/lisp/calc/calc.el 2011-11-21 23:59:09 +0000
@@ -1235,7 +1235,8 @@
        (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