X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/ab66979132563b7acfa33f2e619cd31deb53715a..07c53b50741b6684d3d3ef5177a92861fbaec14c:/admin/archive-contents.el

diff --git a/admin/archive-contents.el b/admin/archive-contents.el
index ae464350d..b63f4cdaf 100755
--- 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")