[bug#74605] environment: Suppress all output with --verbosity=0

Message ID 12298fd80fdf6237e6b899e10c8a0d01948bf097.1732892565.git.brian@kubisiak.com
State New
Headers
Series [bug#74605] environment: Suppress all output with --verbosity=0 |

Commit Message

Brian Kubisiak Nov. 29, 2024, 3:08 p.m. UTC
  * guix/scripts/environment.scm (guix-environment*): Call
'with-status-verbosity' earlier.

Fixes: <https://issues.guix.gnu.org/71298>
Change-Id: I69c7dd1058b44d587312d957312a130a8703cfca
---
 guix/scripts/environment.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)


base-commit: 369d2698b0bfc3726f8e6d232d43d0dda832225f
prerequisite-patch-id: 196f5fb11760945290fabcf660e5c01b9a53de1a
  

Comments

Ludovic Courtès Dec. 18, 2024, 12:23 p.m. UTC | #1
Brian Kubisiak <brian@kubisiak.com> skribis:

> * guix/scripts/environment.scm (guix-environment*): Call
> 'with-status-verbosity' earlier.
>
> Fixes: <https://issues.guix.gnu.org/71298>
> Change-Id: I69c7dd1058b44d587312d957312a130a8703cfca

Applied, thanks!
  

Patch

diff --git a/guix/scripts/environment.scm b/guix/scripts/environment.scm
index fc7fa84be7..648a497743 100644
--- a/guix/scripts/environment.scm
+++ b/guix/scripts/environment.scm
@@ -1140,8 +1140,8 @@  (define (guix-environment* opts)
       (when (pair? symlinks)
         (leave (G_ "'--symlink' cannot be used without '--container'~%"))))
 
-    (with-store/maybe store
-      (with-status-verbosity (assoc-ref opts 'verbosity)
+    (with-status-verbosity (assoc-ref opts 'verbosity)
+      (with-store/maybe store
         (define manifest-from-opts
           (options/resolve-packages store opts))