bug#10874: ange-ftp ignores comments in .netrc

[Michael Albinus]

version: 24.1
thanks

Patrick Goltzsch <pgoltzsch@gmail.com> writes:

> Hi!

Hi,

> Working with different logins for the same machine I came
> across what seems to be a bug in ange-ftp.

I've fixed this in the trunk, will be available with Emacs 24.1. You
could verify it with the following patch:

--8<---------------cut here---------------start------------->8---
*** /home/albinus/src/emacs/lisp/net/ange-ftp.el.~106977~       2012-02-24 
09:17:15.649762132 +0100
--- /home/albinus/src/emacs/lisp/net/ange-ftp.el        2012-02-24 
08:34:40.253090611 +0100
***************
*** 1390,1395 ****
--- 1390,1398 ----
                (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))
--8<---------------cut here---------------end--------------->8---

> Regards,
>
>                   Patrick

Best regards, Michael.