(quoted-insert): Let-bind input-method-function to nil.

2 files changed, 10 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 88004d84047..6f6e4915519 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,12 @@
+2005-11-28  Juri Linkov  <juri@jurta.org>
+
+        * simple.el (quoted-insert): Let-bind input-method-function to nil.
+
+        * replace.el (occur-mode-mouse-goto): Pop, don't switch.
+        (occur-mode-goto-occurrence): Let-bind same-window-buffer-names
+        and same-window-regexps.
+        (occur-next-error): Don't move point for arg 0.
+
 2005-11-28  Chong Yidong  <cyd@stupidchicken.com>
 
         * replace.el (occur-mode-goto-occurrence): Pop, don't switch.
diff --git a/lisp/simple.el b/lisp/simple.el
index f6a6fd6ad9a..a37ffcdd3ca 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -609,7 +609,7 @@ In binary overwrite mode, this function does overwrite, and octal
 digits are interpreted as a character code.  This is intended to be
 useful for editing binary files."
   (interactive "*p")
-  (let* ((char (let (translation-table-for-input)
+  (let* ((char (let (translation-table-for-input input-method-function)
                  (if (or (not overwrite-mode)
                          (eq overwrite-mode 'overwrite-mode-binary))
                      (read-quoted-char)