Commit a8a3541c authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(ange-ftp-skip-msgs): Include 500 code.for

handling FTP security extensions.
parent 1a5c5f2e
...@@ -10,6 +10,9 @@ ...@@ -10,6 +10,9 @@
* time.el (display-time-mail-icon): Use `:ascent center'. * time.el (display-time-mail-icon): Use `:ascent center'.
* ange-ftp.el (ange-ftp-skip-msgs): Include 500 code.for
handling FTP security extensions.
2000-05-11 Dave Love <fx@gnu.org> 2000-05-11 Dave Love <fx@gnu.org>
* calendar/todo-mode.el: New file. * calendar/todo-mode.el: New file.
......
...@@ -666,11 +666,17 @@ parenthesized expressions in REGEXP for the components (in that order)." ...@@ -666,11 +666,17 @@ parenthesized expressions in REGEXP for the components (in that order)."
;; mode and hangs. Have it ignore 550- instead. It will then barf ;; mode and hangs. Have it ignore 550- instead. It will then barf
;; when it gets the 550 line, as it should. ;; when it gets the 550 line, as it should.
;; RFC2228 "FTP Security Extensions" defines extensions to the FTP
;; protocol which involve the client requesting particular
;; authentication methods (typically) at connection establishment. Non
;; security-aware FTP servers should respond to this with a 500 code,
;; which we ignore.
(defcustom ange-ftp-skip-msgs (defcustom ange-ftp-skip-msgs
(concat "^200 \\(PORT\\|Port\\) \\|^331 \\|^150 \\|^350 \\|^[0-9]+ bytes \\|" (concat "^200 \\(PORT\\|Port\\) \\|^331 \\|^150 \\|^350 \\|^[0-9]+ bytes \\|"
"^Connected \\|^$\\|^Remote system\\|^Using\\|^ \\|Password:\\|" "^Connected \\|^$\\|^Remote system\\|^Using\\|^ \\|Password:\\|"
"^Data connection \\|" "^Data connection \\|"
"^local:\\|^Trying\\|^125 \\|^550-\\|^221 .*oodbye\\|" "^local:\\|^Trying\\|^125 \\|^550-\\|^221 .*oodbye\\|"
"^500 .*AUTH \\(KERBEROS\\|GSSAPI\\)\\|^KERBEROS\\|"
"^227 .*[Pp]assive\\|^200 EPRT\\|^500 .*EPRT") "^227 .*[Pp]assive\\|^200 EPRT\\|^500 .*EPRT")
"*Regular expression matching ftp messages that can be ignored." "*Regular expression matching ftp messages that can be ignored."
:group 'ange-ftp :group 'ange-ftp
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment