mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-27 07:37:33 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Richard M. Stallman 1998-10-17 19:48:04 +00:00
parent b9ca3cdb31
commit 68ccc91f99
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ange-ftp.el
View File

@ -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