Function: image-dired-dired-file-marked-p
image-dired-dired-file-marked-p is a byte-compiled function defined in
image-dired.el.gz.
Signature
(image-dired-dired-file-marked-p &optional MARKER)
Documentation
In Dired, return t if file on current line is marked.
If optional argument MARKER is non-nil, it is a character to look
for. The default is to look for dired-marker-char.
Source Code
;; Defined in /usr/src/emacs/lisp/image/image-dired.el.gz
;;; Marking and flagging
(defun image-dired-dired-file-marked-p (&optional marker)
"In Dired, return t if file on current line is marked.
If optional argument MARKER is non-nil, it is a character to look
for. The default is to look for `dired-marker-char'."
(setq marker (or marker dired-marker-char))
(save-excursion
(beginning-of-line)
(and (looking-at dired-re-mark)
(= (aref (match-string 0) 0) marker))))