[elpa] externals/ssh-deploy 1073a7c 078/133: Replace more (require) with (autoload)

[Stefan Monnier]

branch: externals/ssh-deploy
commit 1073a7cc5943d7c7b182eb9a81319326f4b53a47
Author: Christian Johansson <christian@cvj.se>
Commit: Christian Johansson <christian@cvj.se>

    Replace more (require) with (autoload)
---
 ssh-deploy-test.el | 2 --
 ssh-deploy.el      | 4 ++--
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/ssh-deploy-test.el b/ssh-deploy-test.el
index eb77c86..382f87b 100644
--- a/ssh-deploy-test.el
+++ b/ssh-deploy-test.el
@@ -177,8 +177,6 @@
 (defun ssh-deploy-test--upload (async async-with-threads)
   "Test uploads asynchronously if ASYNC is above zero, with threads if 
ASYNC-WITH-THREADS is above zero"
 
-  (require 'ediff-util)
-
   (let ((directory-a (expand-file-name "test-a/"))
         (directory-b (expand-file-name "test-b/")))
 
diff --git a/ssh-deploy.el b/ssh-deploy.el
index 984dc35..c0df025 100644
--- a/ssh-deploy.el
+++ b/ssh-deploy.el
@@ -321,6 +321,8 @@
                    (defvar ange-ftp-netrc-filename ftp-netrc))
                  (autoload 'ediff-same-file-contents "ediff-util")
                  (autoload 'string-remove-prefix "subr-x")
+                 (autoload 'ssh-deploy--diff-directories-data "ssh-deploy")
+                 (autoload 'ssh-deploy--diff-directories-present "ssh-deploy")
                  (funcall start)))
              finish)))
       (display-warning 'ssh-deploy "async-start functions are not 
available!"))))
@@ -703,7 +705,6 @@
           (ssh-deploy--async-process
            (lambda()
              (add-to-list 'load-path script-filename)
-             (require 'ssh-deploy)
              (ssh-deploy--diff-directories-data directory-a directory-b 
exclude-list))
            (lambda(diff)
              (message "Completed calculation of differences between directory 
'%s' and '%s'. Result: %s only in A %s only in B %s differs. (asynchronously)" 
(nth 0 diff) (nth 1 diff) (length (nth 4 diff)) (length (nth 5 diff)) (length 
(nth 7 diff)))
@@ -1274,7 +1275,6 @@
              `(lambda() (let ((ssh-deploy-root-local ,ssh-deploy-root-local)
                               (ssh-deploy-root-remote ,ssh-deploy-root-remote))
                           (add-to-list 'load-path ,script-filename)
-                          (require 'ssh-deploy)
                           (funcall ,ssh-deploy-script)))
              (lambda(result) (message "Completed execution of 
deployment-script. Return: '%s' (asynchronously)" result))
              ssh-deploy-async-with-threads))