Index: emacs/lisp/delsel.el
diff -c emacs/lisp/delsel.el:1.35 emacs/lisp/delsel.el:1.36
*** emacs/lisp/delsel.el:1.35 Sat Aug 6 22:13:42 2005
--- emacs/lisp/delsel.el Sun Aug 14 06:57:21 2005
***************
*** 101,107 ****
(unless empty-region
(setq this-command 'ignore))))
(type
! (delete-active-region)))
(file-supersession
;; If ask-user-about-supersession-threat signals an error,
;; stop safe_run_hooks from clearing out pre-command-hook.
--- 101,111 ----
(unless empty-region
(setq this-command 'ignore))))
(type
! (delete-active-region)
! (if (and overwrite-mode (eq this-command 'self-insert-command))
! (let ((overwrite-mode nil))
! (self-insert-command (prefix-numeric-value
current-prefix-arg))
! (setq this-command 'ignore)))))
(file-supersession
;; If ask-user-about-supersession-threat signals an error,
;; stop safe_run_hooks from clearing out pre-command-hook.
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
