Function: dired-insert-subdir-del

dired-insert-subdir-del is a byte-compiled function defined in dired-aux.el.gz.

Signature

(dired-insert-subdir-del ELEMENT)

Source Code

;; Defined in /usr/src/emacs/lisp/dired-aux.el.gz
(defun dired-insert-subdir-del (element)
  ;; Erase an already present subdir (given by ELEMENT) from buffer.
  ;; Move to that buffer position.  Return a mark-alist.
  (let ((begin-marker (cdr element)))
    (goto-char begin-marker)
    ;; Are at beginning of subdir (and inside it!).  Now determine its end:
    (goto-char (dired-subdir-max))
    (or (eobp);; want a separating newline _between_ subdirs:
	(forward-char -1))
    (prog1
	(dired-remember-marks begin-marker (point))
      (delete-region begin-marker (point)))))