summaryrefslogtreecommitdiff
path: root/lisp/simple.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2009-12-01 18:06:06 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2009-12-01 18:06:06 +0000
commitb08016f2fc31e5312da3e08f9bed49d767d96ce0 (patch)
treea8d03dcb716a15c040b2402381a92f4dd80799f3 /lisp/simple.el
parent9e13b2f4627f861f1ed5bb4efb7e57abea74bfe3 (diff)
downloademacs-b08016f2fc31e5312da3e08f9bed49d767d96ce0.tar.gz
(normal-erase-is-backspace-mode): Fix thinko in message.
Diffstat (limited to 'lisp/simple.el')
-rw-r--r--lisp/simple.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index ad9178e5838..65086dbfdfc 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -6455,7 +6455,7 @@ See also `normal-erase-is-backspace'."
(run-hooks 'normal-erase-is-backspace-hook)
(if (called-interactively-p 'interactive)
(message "Delete key deletes %s"
- (if (terminal-parameter nil 'normal-erase-is-backspace)
+ (if (eq 1 (terminal-parameter nil 'normal-erase-is-backspace))
"forward" "backward")))))
(defvar vis-mode-saved-buffer-invisibility-spec nil