~ruther/guix-local

14e2afa74ba5653f263ecfc0b89c704bed237bd5 — Ludovic Courtès 13 years ago c3f0084 
ui: Use consistent spacing in `show-what-to-build' messages.

* guix/ui.scm (show-what-to-build): Use consistent spacing in "the
  following..." messages.
patch browse .tar.gz 
1 files changed, 4 insertions(+), 4 deletions(-)

M guix/ui.scm

M guix/ui.scm => guix/ui.scm +4 -4
@@ 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)))