Function: denote--rename-dired-file-or-current-file-or-prompt

denote--rename-dired-file-or-current-file-or-prompt is a byte-compiled function defined in denote.el.

Signature

(denote--rename-dired-file-or-current-file-or-prompt)

Documentation

Return Dired file at point or the current file, else prompt for one.

Throw error if FILE is not regular, else return FILE.

Source Code

;; Defined in ~/.emacs.d/elpa/denote-4.2.3/denote.el
;;;;; The renaming commands and their prompts

(defun denote--rename-dired-file-or-current-file-or-prompt ()
  "Return Dired file at point or the current file, else prompt for one.
Throw error if FILE is not regular, else return FILE."
  (or (dired-get-filename nil t)
      buffer-file-name
      (let* ((file (buffer-file-name))
             (format (if file
                         (format "Rename FILE Denote-style [%s]: " file)
                       "Rename FILE Denote-style: "))
             (selected-file (read-file-name format nil file t nil)))
        (if (or (file-directory-p selected-file)
                (not (file-regular-p selected-file)))
            (user-error "Only rename regular files")
          selected-file))))