(ange-ftp-skip-msgs): Skip the 530 response

given by vsFTPd when accessed with a kerberised FTP client.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cc0fa8f3434cbc1b82f89204193e93b776e2ad19..77b454ce760418d545bce039898db6151eff7e9e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-08-27  Francesco Potorti`  <pot@gnu.org>
+
+       * net/ange-ftp.el (ange-ftp-skip-msgs): Skip the 530 response
+       given by vsFTPd when accessed with a kerberised FTP client.
+
 2002-08-27  Richard M. Stallman  <rms@gnu.org>
 
        * files.el (find-alternate-file):

diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el
index bd9a432af7d1dfaf57fae1af15714a5e278c5170..010c7fe18381a52c2897eea185eaa8eb59af70f9 100644 (file)
--- a/lisp/net/ange-ftp.el
+++ b/lisp/net/ange-ftp.el
@@ -728,6 +728,7 @@ parenthesized expressions in REGEXP for the components (in that order)."
          "^Data connection \\|"
          "^local:\\|^Trying\\|^125 \\|^550-\\|^221 .*oodbye\\|"
           "^500 .*AUTH \\(KERBEROS\\|GSSAPI\\)\\|^KERBEROS\\|"
+         "^530 Please login with USER and PASS\\|" ; non kerberised vsFTPd
          "^22[789] .*[Pp]assive\\|^200 EPRT\\|^500 .*EPRT")
   "*Regular expression matching ftp messages that can be ignored."
   :group 'ange-ftp