diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/ange-ftp.el | 4 |
1 files changed, 2 insertions, 2 deletions
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 |