diff options
-rw-r--r-- | guix/scripts/build.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/guix/scripts/build.scm b/guix/scripts/build.scm index 7cb3710853..b153da8493 100644 --- a/guix/scripts/build.scm +++ b/guix/scripts/build.scm @@ -279,11 +279,6 @@ build." (_ #f)) opts))) - (unless (assoc-ref opts 'log-file?) - (show-what-to-build store drv - #:use-substitutes? (assoc-ref opts 'substitutes?) - #:dry-run? (assoc-ref opts 'dry-run?))) - ;; TODO: Add more options. (set-build-options store #:keep-failed? (assoc-ref opts 'keep-failed?) @@ -294,6 +289,11 @@ build." #:max-silent-time (assoc-ref opts 'max-silent-time) #:verbosity (assoc-ref opts 'verbosity)) + (unless (assoc-ref opts 'log-file?) + (show-what-to-build store drv + #:use-substitutes? (assoc-ref opts 'substitutes?) + #:dry-run? (assoc-ref opts 'dry-run?))) + (cond ((assoc-ref opts 'log-file?) (for-each (lambda (file) (let ((log (log-file store file))) |