summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-03-22 11:53:21 +0100
committerLudovic Courtès <ludo@gnu.org>2020-03-22 12:42:52 +0100
commit9b771305df5dfc31c06b81fbdeaae753ba5d4afe (patch)
tree6febe77270874042014b10bec243f135fd84b860
parent883a1765a6edb29fb53c3f68eb2de9d839a3b7e1 (diff)
downloadguix-9b771305df5dfc31c06b81fbdeaae753ba5d4afe.tar.gz
ui: 'build-notifier' invokes continuation when there's nothing to do.
* guix/ui.scm (build-notifier): Call CONTINUE when there's nothing to
build or download, even when DRY-RUN? is true.
-rw-r--r--guix/ui.scm15
1 files changed, 9 insertions, 6 deletions
diff --git a/guix/ui.scm b/guix/ui.scm
index 1c0dd11edc..b9ba8c0f7a 100644
--- a/guix/ui.scm
+++ b/guix/ui.scm
@@ -1078,12 +1078,15 @@ any build happening."
                      #f))
                   things))
 
-    (show-what-to-build store inputs
-                        #:dry-run? dry-run?
-                        #:use-substitutes? use-substitutes?
-                        #:mode mode)
-    (unless dry-run?
-      (continue #t))))
+    (let-values (((build? download?)
+                  (show-what-to-build store inputs
+                                      #:dry-run? dry-run?
+                                      #:use-substitutes? use-substitutes?
+                                      #:mode mode)))
+
+      (unless (and (or build? download?)
+                   dry-run?)
+        (continue #t)))))
 
 (define (right-arrow port)
   "Return either a string containing the 'RIGHT ARROW' character, or an ASCII