# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 986393118 0
# Node ID 58527e03832410fdf41eb2348ba79ce702c8cc27
# Parent  88ff4aa7aa813480d4d7bd970e2e535e158873a5
(command-line): Use normal-erase-is-backspace and
normal-erase-is-backspace-mode.

diff -r 88ff4aa7aa81 -r 58527e038324 lisp/startup.el
--- a/lisp/startup.el	Wed Apr 04 14:04:43 2001 +0000
+++ b/lisp/startup.el	Wed Apr 04 14:05:18 2001 +0000
@@ -780,8 +780,8 @@
 	      (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)