Function: ffap-prompter

ffap-prompter is a byte-compiled function defined in ffap.el.gz.

Signature

(ffap-prompter &optional GUESS SUFFIX)

Source Code

;; Defined in /usr/src/emacs/lisp/ffap.el.gz
(defun ffap-prompter (&optional guess suffix)
  ;; Does guess and prompt step for find-file-at-point.
  ;; Extra complication for the temporary highlighting.
  (unwind-protect
      ;; This catch will let ffap-alist entries do their own prompting
      ;; and then maybe skip over this prompt (ff-paths, for example).
      (catch 'ffap-prompter
	(ffap-read-file-or-url
	 (if ffap-url-regexp
             (format "Find file or URL%s: " (or suffix ""))
           (format "Find file%s: " (or suffix "")))
	 (prog1
             (let ((mark-active nil))
               ;; Don't use the region here, since it can be something
               ;; completely unwieldy.  If the user wants that, she could
               ;; use M-w before and then C-y.  --Stef
               (setq guess (or guess (ffap-guesser)))) ; using ffap-alist here
	   (and guess (ffap-highlight))
	   )))
    (ffap-highlight t)))