Function: ange-ftp-expand-file-name

ange-ftp-expand-file-name is a byte-compiled function defined in ange-ftp.el.gz.

Signature

(ange-ftp-expand-file-name NAME &optional DEFAULT)

Documentation

Documented as expand-file-name.

Source Code

;; Defined in /usr/src/emacs/lisp/net/ange-ftp.el.gz
(defun ange-ftp-expand-file-name (name &optional default)
  "Documented as `expand-file-name'."
  (save-match-data
    (setq default (or default default-directory))
    (cond
     ((ange-ftp-ftp-name name)
      ;; `default' is irrelevant.
      (ange-ftp-canonize-filename name))
     ((file-name-absolute-p name)
      ;; `name' is absolute but is not an ange-ftp name => not ange-ftp.
      (ange-ftp-real-expand-file-name name "/"))
     ((ange-ftp-canonize-filename
       (concat (file-name-as-directory default) name))))))