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

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 55406cff166..45016ac29d2 100644
--- 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 63f5baff875..d9af92f83ea 100644
--- 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)