# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 739738008 0
# Node ID 219ff1cb76f41e60f246782c8133cd376cc82e8e
# Parent  062dbb10173d6ba5e8051622af40e9cee069cecd
(ange-ftp-multi-msgs): Add 331-.

diff -r 062dbb10173d -r 219ff1cb76f4 lisp/ange-ftp.el
--- a/lisp/ange-ftp.el	Thu Jun 10 17:48:36 1993 +0000
+++ b/lisp/ange-ftp.el	Thu Jun 10 18:46:48 1993 +0000
@@ -630,7 +630,7 @@
 ;; Otherwise, ange-ftp will go into multi-skip mode, and never come out.
 
 (defvar ange-ftp-multi-msgs
-  "^220-\\|^230-\\|^226\\|^25.-\\|^221-\\|^200-\\|^530-\\|^4[25]1-"
+  "^220-\\|^230-\\|^226\\|^25.-\\|^221-\\|^200-\\|^331-\\|^4[25]1-\\|^530-"
   "*Regular expression matching messages from the ftp process that start
 a multiline reply.")
 
@@ -856,7 +856,7 @@
 ;;;; Internal variables.
 ;;;; ------------------------------------------------------------
 
-(defconst ange-ftp-version "$Revision: 1.25 $")
+(defconst ange-ftp-version "$Revision: 1.26 $")
 
 (defvar ange-ftp-data-buffer-name " *ftp data*"
   "Buffer name to hold directory listing data received from ftp process.")