From: Stefan Monnier Date: Tue, 1 Dec 2009 18:06:06 +0000 (+0000) Subject: (normal-erase-is-backspace-mode): Fix thinko in message. X-Git-Tag: emacs-pretest-23.1.90~136 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b08016f2fc31e5312da3e08f9bed49d767d96ce0;p=emacs.git (normal-erase-is-backspace-mode): Fix thinko in message. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 202770d96af..00bb0c5606e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2009-12-01 Stefan Monnier + + * simple.el (normal-erase-is-backspace-mode): Fix thinko in message. + 2009-12-01 Glenn Morris * window.el (window--display-buffer-2): Fix previous changes. 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