summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/scripts/home.scm2
-rw-r--r--guix/scripts/system.scm2
2 files changed, 2 insertions, 2 deletions
diff --git a/guix/scripts/home.scm b/guix/scripts/home.scm
index afc7d8b39c..9573661856 100644
--- a/guix/scripts/home.scm
+++ b/guix/scripts/home.scm
@@ -286,7 +286,7 @@ deploy the home environment described by these files.\n")
((describe)
(match (generation-number %guix-home)
(0
- (error (G_ "no home environment generation, nothing to describe~%")))
+ (leave (G_ "no home environment generation, nothing to describe~%")))
(generation
(display-home-environment-generation generation))))
((list-generations)
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index 62258c1420..98e788c657 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -1321,7 +1321,7 @@ argument list and OPTS is the option alist."
((describe)
(match (generation-number %system-profile)
(0
- (error (G_ "no system generation, nothing to describe~%")))
+ (leave (G_ "no system generation, nothing to describe~%")))
(generation
(display-system-generation generation))))
((search)