* admin/archive-contents.el (archive--sync-emacs-repo): Fix thinko.

diff --git a/admin/archive-contents.el b/admin/archive-contents.el
index ae464350db455bc1c4d60fd90aa9b1eb4b275319..b63f4cdaf94dfbf8c2c858967121f287dd392d4e 100755 (executable)
--- a/admin/archive-contents.el
+++ b/admin/archive-contents.el
@@ -572,7 +572,8 @@ Return non-nil if there's an \"emacs\" repository present."
   ;; has setup a clone of Emacs under the "emacs" subdirectory.
   (let ((emacs-repo-root (expand-file-name "emacs")))
     (if (not (file-directory-p emacs-repo-root))
-        (message "No \"emacs\" subdir: will skip :core packages")
+        (progn (message "No \"emacs\" subdir: will skip :core packages")
+               nil)
       (let ((default-directory emacs-repo-root))
         (message "Running git pull in %S" default-directory)
         (call-process "git" nil t nil "pull")