* net/ange-ftp.el (ange-ftp-skip-msgs): Add 534.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 886df2dd7455bed194d97eaf77d56e177b77e213..0cd63d7dec7e0a559013b656789a42a81703c1e5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2009-03-24  Michael Albinus  <michael.albinus@gmx.de>
+
+       * net/ange-ftp.el (ange-ftp-skip-msgs): Add 534.
+
 2009-03-24  Glenn Morris  <rgm@gnu.org>
 
        * wid-edit.el (widget-specify-field): Don't add a second overlay for a

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