Function: diff-kill-creations-deletions

diff-kill-creations-deletions is a byte-compiled function defined in diff-mode.el.gz.

Signature

(diff-kill-creations-deletions &optional DELETE)

Documentation

Kill all hunks for file creations and deletions.

Optional argument DELETE is passed on to diff-file-kill.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/diff-mode.el.gz
(defun diff-kill-creations-deletions (&optional delete)
  "Kill all hunks for file creations and deletions.
Optional argument DELETE is passed on to `diff-file-kill'."
  (save-excursion
    (cl-loop initially
             (goto-char (point-min))
             (ignore-errors (diff-file-next))
             for (name1 name2) = (diff-hunk-file-names)
             if (or (equal name1 null-device)
                    (equal name2 null-device))
             do (diff-file-kill delete)
             else if (eq (prog1 (point)
                           (ignore-errors (diff-file-next)))
                         (point))
             do (cl-return))))