diff options
Diffstat (limited to 'lisp/net/ange-ftp.el')
| -rw-r--r-- | lisp/net/ange-ftp.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el index 4338cdff3cd..2a44148e4ce 100644 --- a/lisp/net/ange-ftp.el +++ b/lisp/net/ange-ftp.el @@ -1390,6 +1390,9 @@ only return the directory part of FILE." (run-hooks 'find-file-hook) (setq buffer-file-name nil) (goto-char (point-min)) + (while (search-forward-regexp "^[ \t]*#.*$" nil t) + (replace-match "")) + (goto-char (point-min)) (skip-chars-forward " \t\r\n") (while (not (eobp)) (ange-ftp-parse-netrc-group)) |