diff --git a/.local/share/common-lisp/source/ambrevar/storage.lisp b/.local/share/common-lisp/source/ambrevar/storage.lisp index d8adfbcf..67e3fa5c 100644 --- a/.local/share/common-lisp/source/ambrevar/storage.lisp +++ b/.local/share/common-lisp/source/ambrevar/storage.lisp @@ -256,7 +256,9 @@ If DESTINATION ends with '.gpg', it gets GPG-encrypted." (defun sync-all () ; REVIEW: Optionally call `sync-gpg-key'? (dolist (op '(write-roots-index notmuch-tags - stowed-saves - project-status)) + stowed-saves)) (log:info "~a" op) - (funcall op))) + (funcall op)) + ;; Run last to get inspectable return value: + (log:info "~a" 'project-statuses) + (project-statuses))