Function: project--remote-file-names

project--remote-file-names is a byte-compiled function defined in project.el.gz.

Signature

(project--remote-file-names LOCAL-FILES)

Documentation

Return LOCAL-FILES as if they were on the system of default-directory.

Also quote LOCAL-FILES if default-directory is quoted.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/project.el.gz
(defun project--remote-file-names (local-files)
  "Return LOCAL-FILES as if they were on the system of `default-directory'.
Also quote LOCAL-FILES if `default-directory' is quoted."
  (let ((remote-id (file-remote-p default-directory)))
    (if (not remote-id)
        (if (file-name-quoted-p default-directory)
            (mapcar #'file-name-quote local-files)
          local-files)
      (mapcar (lambda (file)
                (concat remote-id file))
              local-files))))