Function: ffap--url-file-handler

ffap--url-file-handler is a byte-compiled function defined in ffap.el.gz.

Signature

(ffap--url-file-handler OPERATION &rest ARGS)

Source Code

;; Defined in /usr/src/emacs/lisp/ffap.el.gz
;;; Prompting (`ffap-read-file-or-url'):
;;
;; We want to complete filenames as in read-file-name, but also url's
;; which read-file-name-internal would truncate at the "//" string.
;; The solution here is to forcefully activate url-handler-mode, which
;; takes care of it for us.

(defun ffap--url-file-handler (operation &rest args)
  (let ((inhibit-file-name-handlers
         (cons 'ffap--url-file-handler inhibit-file-name-handlers))
        (inhibit-file-name-operation operation))
    (cl-case operation
      ;; We mainly just want to disable these bits:
      (substitute-in-file-name (car args))
      (expand-file-name (car args))
      (unhandled-file-name-directory temporary-file-directory)
      (otherwise
       (apply operation args)))))