From 4357341d9ec66eb7258b2c749b84ef35faaab39f Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 10 Jan 2000 08:41:22 +0000 Subject: [PATCH] (ange-ftp-file-name-nondirectory): Don't ever include the host name or user name in the value. --- lisp/ange-ftp.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el index 68f8f954253..63f5baff875 100644 --- a/lisp/ange-ftp.el +++ b/lisp/ange-ftp.el @@ -3077,7 +3077,7 @@ system TYPE.") (if (save-match-data (string-match "^~[^/]*$" filename)) "" - (ange-ftp-real-file-name-nondirectory name))) + (ange-ftp-real-file-name-nondirectory filename))) (ange-ftp-real-file-name-nondirectory name)))) (defun ange-ftp-directory-file-name (dir) -- 2.39.5