aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ange-ftp.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index 97d6e4c3736..43bdd2e306a 100644
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -3950,6 +3950,8 @@ directory, so that Emacs will know its current contents."
3950 (let ((tryfiles (if nosuffix 3950 (let ((tryfiles (if nosuffix
3951 (list file) 3951 (list file)
3952 (list (concat file ".elc") (concat file ".el") file))) 3952 (list (concat file ".elc") (concat file ".el") file)))
3953 ;; make sure there are no references to temp files
3954 (load-force-doc-strings t)
3953 copy) 3955 copy)
3954 (while (and tryfiles (not copy)) 3956 (while (and tryfiles (not copy))
3955 (catch 'ftp-error 3957 (catch 'ftp-error