(backward-delete-char-untabify):

Don't handle overwrite-mode here (done in delete-backward-char).

diff --git a/lisp/simple.el b/lisp/simple.el
index f42c8d860f7b9a90ba1205938b7818322fe7be1b..b24e6d87e2d23f20fd113269291248c740fcfa86 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -286,11 +286,7 @@ and KILLP is t if a prefix arg was specified."
              (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.