Function: image-dired-tag-files

image-dired-tag-files is an autoloaded, interactive and byte-compiled function defined in image-dired.el.gz.

Signature

(image-dired-tag-files ARG)

Documentation

Tag marked file(s) in Dired. With prefix ARG, tag file at point.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/image-dired.el.gz
;;;###autoload
(defun image-dired-tag-files (arg)
  "Tag marked file(s) in Dired.  With prefix ARG, tag file at point."
  (interactive "P")
  (let ((tag (completing-read
              "Tags to add (separate tags with a semicolon): "
              image-dired-tag-history nil nil nil 'image-dired-tag-history))
        files)
    (if arg
        (setq files (list (dired-get-filename)))
      (setq files (dired-get-marked-files)))
    (image-dired-write-tags
     (mapcar
      (lambda (x)
        (cons x tag))
      files))))