diff options
| -rw-r--r-- | lisp/ange-ftp.el | 2 |
1 files changed, 1 insertions, 1 deletions
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.") | |||
| 3077 | (if (save-match-data | 3077 | (if (save-match-data |
| 3078 | (string-match "^~[^/]*$" filename)) | 3078 | (string-match "^~[^/]*$" filename)) |
| 3079 | "" | 3079 | "" |
| 3080 | (ange-ftp-real-file-name-nondirectory name))) | 3080 | (ange-ftp-real-file-name-nondirectory filename))) |
| 3081 | (ange-ftp-real-file-name-nondirectory name)))) | 3081 | (ange-ftp-real-file-name-nondirectory name)))) |
| 3082 | 3082 | ||
| 3083 | (defun ange-ftp-directory-file-name (dir) | 3083 | (defun ange-ftp-directory-file-name (dir) |