Skip to content
Snippets Groups Projects
Unverified Commit 882393de authored by Mathieu Othacehe's avatar Mathieu Othacehe
Browse files

Add debug log.

* src/cuirass/base.scm (create-build-outputs): Add a debug message.
parent 83e79f38
No related branches found
No related tags found
No related merge requests found
......@@ -675,6 +675,7 @@ by PRODUCT-SPECS."
(let ((product (and (build-has-products? (assq-ref spec #:job))
(find-product build spec))))
(when (and product (file-exists? product))
(log-message "Adding build product ~a" product)
(db-add-build-product `((#:build . ,(assq-ref build #:id))
(#:type . ,(assq-ref spec #:type))
(#:file-size . ,(file-size product))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment