Function: ange-ftp-file-name-as-directory

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

Signature

(ange-ftp-file-name-as-directory NAME)

Documentation

Documented as file-name-as-directory.

Source Code

;; Defined in /usr/src/emacs/lisp/net/ange-ftp.el.gz
(defun ange-ftp-file-name-as-directory (name)
  "Documented as `file-name-as-directory'."
  (let ((parsed (ange-ftp-ftp-name name)))
    (if parsed
	(if (and non-essential (string-equal (nth 2 parsed) ""))
	    name
	  (funcall (or (cdr (assq
			     (ange-ftp-host-type (car parsed))
			     ange-ftp-file-name-as-directory-alist))
		       'ange-ftp-real-file-name-as-directory)
		   name))
      (ange-ftp-real-file-name-as-directory name))))