diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2013-04-27 16:37:09 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2013-04-27 16:37:09 +0200 |
| commit | 14e2afa74ba5653f263ecfc0b89c704bed237bd5 (patch) | |
| tree | 5a75d3f376524801de15e412ea89ee35955ce393 | |
| parent | c3f0084ad36ed2458f78ad42cd7a47bc7f1b91cf (diff) | |
| download | guix-14e2afa74ba5653f263ecfc0b89c704bed237bd5.tar.gz | |
ui: Use consistent spacing in `show-what-to-build' messages.
* guix/ui.scm (show-what-to-build): Use consistent spacing in "the following..." messages.
| -rw-r--r-- | guix/ui.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/guix/ui.scm b/guix/ui.scm index ff0966e85c..f8826cd488 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -213,23 +213,23 @@ available for download." (begin (format (current-error-port) (N_ "~:[the following derivation would be built:~%~{ ~a~%~}~;~]" - "~:[the following derivations would be built:~%~{ ~a~%~}~;~]" + "~:[the following derivations would be built:~%~{ ~a~%~}~;~]" (length build)) (null? build) build) (format (current-error-port) (N_ "~:[the following file would be downloaded:~%~{ ~a~%~}~;~]" - "~:[the following files would be downloaded:~%~{ ~a~%~}~;~]" + "~:[the following files would be downloaded:~%~{ ~a~%~}~;~]" (length download)) (null? download) download)) (begin (format (current-error-port) (N_ "~:[the following derivation will be built:~%~{ ~a~%~}~;~]" - "~:[the following derivations will be built:~%~{ ~a~%~}~;~]" + "~:[the following derivations will be built:~%~{ ~a~%~}~;~]" (length build)) (null? build) build) (format (current-error-port) (N_ "~:[the following file will be downloaded:~%~{ ~a~%~}~;~]" - "~:[the following files will be downloaded:~%~{ ~a~%~}~;~]" + "~:[the following files will be downloaded:~%~{ ~a~%~}~;~]" (length download)) (null? download) download))) (pair? build))) |