Function: image-dired-format-properties-string

image-dired-format-properties-string is a byte-compiled function defined in image-dired.el.gz.

Signature

(image-dired-format-properties-string BUF FILE IMAGE-COUNT PROPS COMMENT)

Documentation

Format display properties for Image-Dired.

The properties are formatted according to specification in image-dired-display-properties-format, which see. BUF is the associated Dired buffer, FILE is the original image file name, IMAGE-COUNT is a string like "N/M" where N is the number of this image and M is the total number of images, PROPS is a stringified list of tags, and COMMENT is the image file's comment.

Source Code

;; Defined in /usr/src/emacs/lisp/image/image-dired.el.gz
;;; Header line

(defun image-dired-format-properties-string (buf file image-count props comment)
  "Format display properties for Image-Dired.
The properties are formatted according to specification
in `image-dired-display-properties-format', which see.
BUF is the associated Dired buffer, FILE is the original image
file name, IMAGE-COUNT is a string like \"N/M\" where N is the
number of this image and M is the total number of images, PROPS
is a stringified list of tags, and COMMENT is the image file's
comment."
  (format-spec
   image-dired-display-properties-format
   `((?b . ,(or buf ""))
     (?d . ,(propertize
             (file-name-nondirectory
              (directory-file-name
               (file-name-directory file)))
             'face 'image-dired-thumb-header-directory-name))
     (?f . ,(propertize (file-name-nondirectory file)
                        'face 'image-dired-thumb-header-file-name))
     (?n . ,(propertize image-count
                        'face 'image-dired-thumb-header-image-count))
     (?s . ,(propertize (if (file-exists-p file)
                            (file-size-human-readable
                             (file-attribute-size
                              (file-attributes file)))
                          "<File missing>")
                        'face 'image-dired-thumb-header-file-size))
     (?t . ,(or props ""))
     (?c . ,(or comment "")))))