Function: image-dired--update-header-line

image-dired--update-header-line is a byte-compiled function defined in image-dired.el.gz.

Signature

(image-dired--update-header-line)

Documentation

Update image information in the header line.

Aliases

image-dired-display-thumb-properties (obsolete since 29.1)

Source Code

;; Defined in /usr/src/emacs/lisp/image/image-dired.el.gz
(defun image-dired--update-header-line ()
  "Update image information in the header line."
  (when (derived-mode-p 'image-dired-thumbnail-mode)
    (let ((file-name (image-dired-original-file-name))
          (dired-buf (buffer-name (image-dired-associated-dired-buffer)))
          (image-count (format "%s/%s"
                               ;; Line-up adds one space between two
                               ;; images: this formula takes this into
                               ;; account.
                               (1+ (/ (point) 2))
                               image-dired--number-of-thumbnails))
          (props (string-join (get-text-property (point) 'tags) ", "))
          (comment (get-text-property (point) 'comment))
          (message-log-max nil))
      (when file-name
        (setq header-line-format
              (image-dired-format-properties-string
               dired-buf
               file-name
               image-count
               props
               comment))))))