From: Richard M. Stallman Date: Tue, 27 Aug 2002 21:21:24 +0000 (+0000) Subject: (ange-ftp-skip-msgs): Skip the 530 response X-Git-Tag: ttn-vms-21-2-B4~13536 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6309b0e19c7fd249fa3c59dfcf28562b75ede0d5;p=emacs.git (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 cc0fa8f3434..77b454ce760 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-08-27 Francesco Potorti` + + * 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 * files.el (find-alternate-file): diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el index bd9a432af7d..010c7fe1838 100644 --- 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