Function: ange-ftp-file-name-nondirectory

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

Signature

(ange-ftp-file-name-nondirectory NAME)

Documentation

Documented as file-name-nondirectory.

Source Code

;; Defined in /usr/src/emacs/lisp/net/ange-ftp.el.gz
(defun ange-ftp-file-name-nondirectory (name)
  "Documented as `file-name-nondirectory'."
  (let ((parsed (ange-ftp-ftp-name name)))
    (if parsed
	(let ((filename (nth 2 parsed)))
	  (if (string-match-p "\\`~[^/]*\\'" filename)
	      ""
	    (ange-ftp-real-file-name-nondirectory filename)))
      (ange-ftp-real-file-name-nondirectory name))))