Function: image-dired-set-exif-data

image-dired-set-exif-data is a byte-compiled function defined in image-dired-external.el.gz.

Signature

(image-dired-set-exif-data FILE TAG-NAME TAG-VALUE)

Documentation

In FILE, set EXIF tag TAG-NAME to value TAG-VALUE.

This function inserts any output from exiftool program into the current buffer, so it could be shown to the user. If that is not desirable, wrap the call in with-temp-buffer.

Source Code

;; Defined in /usr/src/emacs/lisp/image/image-dired-external.el.gz
(defun image-dired-set-exif-data (file tag-name tag-value)
  "In FILE, set EXIF tag TAG-NAME to value TAG-VALUE.
This function inserts any output from `exiftool' program into
the current buffer, so it could be shown to the user.  If that
is not desirable, wrap the call in `with-temp-buffer'."
  (image-dired--check-executable-exists
   'image-dired-cmd-write-exif-data-program)
  (let ((spec
         (list
          (cons ?f (expand-file-name file))
          (cons ?u (image-dired--file-URI (expand-file-name file)))
          (cons ?t tag-name)
          (cons ?v tag-value))))
    (apply #'call-process image-dired-cmd-write-exif-data-program nil t nil
           (mapcar (lambda (arg) (format-spec arg spec))
                   image-dired-cmd-write-exif-data-options))))