# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 825631250 0
# Node ID 2630ac7746472b54abd941b340dcebb016a44533
# Parent  52a6ccf7c0a847567484047a67deeb4fa8e5dd1d
(backward-delete-char-untabify):
Don't handle overwrite-mode here (done in delete-backward-char).

diff -r 52a6ccf7c0a8 -r 2630ac774647 lisp/simple.el
--- a/lisp/simple.el	Thu Feb 29 19:22:05 1996 +0000
+++ b/lisp/simple.el	Thu Feb 29 22:00:50 1996 +0000
@@ -286,11 +286,7 @@
 	      (delete-char 1)))
 	(forward-char -1)
 	(setq count (1- count)))))
-  (delete-backward-char arg killp)
-  ;; In overwrite mode, back over columns while clearing them out,
-  ;; unless at end of line.
-  (and overwrite-mode (not (eolp))
-       (save-excursion (insert-char ?\  arg))))
+  (delete-backward-char arg killp))
 
 (defun zap-to-char (arg char)
   "Kill up to and including ARG'th occurrence of CHAR.