(ange-ftp-skip-msgs): Add regexp for EPRT.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 55406cff1667c5269a455e050c399f9ff3901323..45016ac29d236bad1da81ce1c1cfbf5bfd9a7045 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2000-01-18  Gerd Moellmann  <gerd@gnu.org>
+
+       * ange-ftp.el (ange-ftp-skip-msgs): Add regexp for EPRT.
+
 2000-01-17  Gerd Moellmann  <gerd@gnu.org>
 
        * tmm.el (tmm-goto-completions): Adapt to prompt being part

diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index 63f5baff87521d89b9d14bd354c7c312fbe288cb..d9af92f83ea70a9f5f79ab61161156752f09e2b8 100644 (file)
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -671,7 +671,7 @@ parenthesized expressions in REGEXP for the components (in that order)."
          "^Connected \\|^$\\|^Remote system\\|^Using\\|^ \\|Password:\\|"
          "^Data connection \\|"
          "^local:\\|^Trying\\|^125 \\|^550-\\|^221 .*oodbye\\|"
-         "^227 .*[Pp]assive")
+         "^227 .*[Pp]assive\\|^200 EPRT\\|^500 .*EPRT")
   "*Regular expression matching ftp messages that can be ignored."
   :group 'ange-ftp
   :type 'regexp)