Function: emerge-copy-as-kill-A

emerge-copy-as-kill-A is an interactive and byte-compiled function defined in emerge.el.gz.

Signature

(emerge-copy-as-kill-A)

Documentation

Put the A variant of this difference in the kill ring.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/vc/emerge.el.gz
(defun emerge-copy-as-kill-A ()
  "Put the A variant of this difference in the kill ring."
  (interactive)
  (emerge-validate-difference)
  (let* ((diff-vector
	  (aref emerge-difference-list emerge-current-difference))
	 (A-begin (1+ (aref diff-vector 0)))
	 (A-end (1- (aref diff-vector 1)))
	 ;; so further kills don't append
	 this-command)
    (with-current-buffer emerge-A-buffer
      (copy-region-as-kill A-begin A-end))))