aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2002-11-09 12:56:04 +0000
committerDave Love2002-11-09 12:56:04 +0000
commitc2f516353a3613e33f76ffb1875f0894a5c2ba18 (patch)
treea69edf8617f875b1671072a6ab7ee17760c64709
parent9372a49f0c7aa1979d79dd29a6bf8c35c18e27e4 (diff)
downloademacs-c2f516353a3613e33f76ffb1875f0894a5c2ba18.tar.gz
emacs-c2f516353a3613e33f76ffb1875f0894a5c2ba18.zip
(quoted-insert): Bind translation-table-for-input, not
keyboard-translate-table.
-rw-r--r--lisp/simple.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index 12abbe82bc1..bff80ce6625 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -318,7 +318,7 @@ In binary overwrite mode, this function does overwrite, and octal
318digits are interpreted as a character code. This is intended to be 318digits are interpreted as a character code. This is intended to be
319useful for editing binary files." 319useful for editing binary files."
320 (interactive "*p") 320 (interactive "*p")
321 (let* ((char (let (keyboard-translate-table) 321 (let* ((char (let (translation-table-for-input)
322 (if (or (not overwrite-mode) 322 (if (or (not overwrite-mode)
323 (eq overwrite-mode 'overwrite-mode-binary)) 323 (eq overwrite-mode 'overwrite-mode-binary))
324 (read-quoted-char) 324 (read-quoted-char)