Function: dired-map-dired-file-lines

dired-map-dired-file-lines is a byte-compiled function defined in dired-aux.el.gz.

Signature

(dired-map-dired-file-lines FUN)

Source Code

;; Defined in /usr/src/emacs/lisp/dired-aux.el.gz
;;; Subroutines of dired-clean-directory

(defun dired-map-dired-file-lines (fun)
  ;; Perform FUN with point at the end of each non-directory line.
  ;; FUN takes one argument, the absolute filename.
  (save-excursion
    (let (file buffer-read-only)
      (goto-char (point-min))
      (while (not (eobp))
	(save-excursion
	  (and (not (looking-at-p dired-re-dir))
	       (not (eolp))
	       (setq file (dired-get-filename nil t)) ; nil on non-file
	       (progn (end-of-line)
		      (funcall fun file))))
	(forward-line 1)))))