diff options
author | Ludovic Courtès <ludo@gnu.org> | 2013-04-12 18:07:17 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2013-04-12 18:07:17 +0200 |
commit | c31d1a7860203cb779b16171fe50ec9948135bc2 (patch) | |
tree | 6f15159448dbc67fcce7134732c0af6b0abe7b16 | |
parent | 9297c90b69ba2d1f504f8c63b92510806615847d (diff) | |
download | patches-c31d1a7860203cb779b16171fe50ec9948135bc2.tar patches-c31d1a7860203cb779b16171fe50ec9948135bc2.tar.gz |
package: Being at the empty profile is not an error.
* guix/scripts/package.scm (roll-back): Use `format', not `leave' when
indicating "already at the empty profile". Fixes a regression
introduced in a2011be5dfaf2b94a1d0e3dfbcf4b512389b4711. Reported by
Nikita Karetnikov <nikita@karetnikov.org>.
-rw-r--r-- | guix/scripts/package.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm index ba75cd778c..ac99d16497 100644 --- a/guix/scripts/package.scm +++ b/guix/scripts/package.scm @@ -211,7 +211,8 @@ all of PACKAGES, a list of name/version/output/path/deps tuples." (leave (_ "error: profile `~a' does not exist~%") profile)) ((zero? number) ; empty profile - (leave (_ "nothing to do: already at the empty profile~%"))) + (format (current-error-port) + (_ "nothing to do: already at the empty profile~%"))) ((or (zero? previous-number) ; going to emptiness (not (file-exists? previous-profile))) (let*-values (((drv-path drv) |