(command-line): Use normal-erase-is-backspace and

normal-erase-is-backspace-mode.

(command-line): Use normal-erase-is-backspace and
normal-erase-is-backspace-mode.
d8e17bc6 · Eli Zaretskii · 8e58a55c · d8e17bc6
Commit d8e17bc6 authored Apr 04, 2001 by Eli Zaretskii
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/startup.el lisp/startup.el +2 -2

No files found.
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -780,8 +780,8 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
 	      (and (memq window-system '(x))
 		   (fboundp 'x-backspace-delete-keys-p)
 		   (x-backspace-delete-keys-p)))
-      (setq-default delete-key-deletes-forward t)
-      (delete-key-deletes-forward-mode 1)))
+      (setq-default normal-erase-is-backspace t)
+      (normal-erase-is-backspace-mode 1)))

  (when (and (not noninteractive)
 	     (display-graphic-p)