Function: edt-replace
edt-replace is an interactive and byte-compiled function defined in
edt.el.gz.
Signature
(edt-replace)
Documentation
Replace marked section with last CUT (killed) text.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/emulation/edt.el.gz
;;;
;;; REPLACE
;;;
(defun edt-replace ()
"Replace marked section with last CUT (killed) text."
(interactive "*")
(if (edt-check-match)
(replace-match (car kill-ring-yank-pointer))
(progn
(exchange-point-and-mark)
(let ((beg (point)))
(exchange-point-and-mark)
(delete-region beg (point)))
(yank))))