diff options
| -rw-r--r-- | build-aux/build-self.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/build-aux/build-self.scm b/build-aux/build-self.scm index 2782a4da729..f86c79f0d0d 100644 --- a/build-aux/build-self.scm +++ b/build-aux/build-self.scm | |||
| @@ -408,7 +408,11 @@ files." | |||
| 408 | (major ((store-lift nix-server-major-version))) | 408 | (major ((store-lift nix-server-major-version))) |
| 409 | (minor ((store-lift nix-server-minor-version)))) | 409 | (minor ((store-lift nix-server-minor-version)))) |
| 410 | (mbegin %store-monad | 410 | (mbegin %store-monad |
| 411 | (show-what-to-build* (list build)) | 411 | ;; Before 'with-build-handler' was implemented and used, we had to |
| 412 | ;; explicitly call 'show-what-to-build*'. | ||
| 413 | (munless (module-defined? (resolve-module '(guix store)) | ||
| 414 | 'with-build-handler) | ||
| 415 | (show-what-to-build* (list build))) | ||
| 412 | (built-derivations (list build)) | 416 | (built-derivations (list build)) |
| 413 | 417 | ||
| 414 | ;; Use the port beneath the current store as the stdin of BUILD. This | 418 | ;; Use the port beneath the current store as the stdin of BUILD. This |