diff options
| author | Richard M. Stallman | 2003-04-03 22:58:49 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2003-04-03 22:58:49 +0000 |
| commit | f605434debc85555137c9dabe55f668a3abde217 (patch) | |
| tree | 9fb09277e84c5b8f1661a0576c4a8c3214eae794 | |
| parent | 7cd032e1308d28029454cd91b9734bebf7a85ecb (diff) | |
| download | emacs-f605434debc85555137c9dabe55f668a3abde217.tar.gz emacs-f605434debc85555137c9dabe55f668a3abde217.zip | |
(delete-active-region): Don't explicitly deactivate mark.
| -rw-r--r-- | lisp/delsel.el | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/lisp/delsel.el b/lisp/delsel.el index 9488e94061e..9305dfbf31f 100644 --- a/lisp/delsel.el +++ b/lisp/delsel.el | |||
| @@ -75,8 +75,6 @@ any selection." | |||
| 75 | (if killp | 75 | (if killp |
| 76 | (kill-region (point) (mark)) | 76 | (kill-region (point) (mark)) |
| 77 | (delete-region (point) (mark))) | 77 | (delete-region (point) (mark))) |
| 78 | (setq mark-active nil) | ||
| 79 | (run-hooks 'deactivate-mark-hook) | ||
| 80 | t) | 78 | t) |
| 81 | 79 | ||
| 82 | (defun delete-selection-pre-hook () | 80 | (defun delete-selection-pre-hook () |