diff options
| author | Richard M. Stallman <rms@gnu.org> | 1996-02-29 22:00:50 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1996-02-29 22:00:50 +0000 |
| commit | 0f17d7c9503958f445495c1b40f300182ea6ac39 (patch) | |
| tree | 39bbdb8123e73f78c86f12780f09ede2397b282a | |
| parent | ba617751754f7f67394d203225b5b68dc7b7d266 (diff) | |
| download | emacs-0f17d7c9503958f445495c1b40f300182ea6ac39.tar.gz | |
(backward-delete-char-untabify):
Don't handle overwrite-mode here (done in delete-backward-char).
| -rw-r--r-- | lisp/simple.el | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index f42c8d860f7..b24e6d87e2d 100644 --- 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. |