From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 17 Oct 1998 19:48:04 +0000 (+0000)
Subject: (ange-ftp-waiting-flag): defvar moved.
X-Git-Tag: emacs-20.4~1466
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=68ccc91f99a3d5f83484b5aaa3bd2c9987acda92;p=emacs.git

(ange-ftp-waiting-flag): defvar moved.
---

diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index 08b9759b7e6..6e3e0f51686 100644
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -3534,6 +3534,8 @@ system TYPE.")
 			t-parsed t-host t-user t-name t-abbr
 			nil nil cont nowait))))))
 
+(defvar ange-ftp-waiting-flag nil)
+
 ;; next part of copying routine.
 (defun ange-ftp-cf1 (result line
 			    filename newname binary msg
@@ -3936,8 +3938,6 @@ directory, so that Emacs will know its current contents."
 				       (format "Getting %s" fn1))
 	  tmp1))))
 
-(defvar ange-ftp-waiting-flag nil)
-
 (defun ange-ftp-load (file &optional noerror nomessage nosuffix)
   (if (ange-ftp-ftp-name file)
       (let ((tryfiles (if nosuffix