all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Remco van 't Veer <remco@remworks.net>
To: zimoun <zimon.toutoune@gmail.com>
Cc: Julien Lepiller <julien@lepiller.eu>,
	58880@debbugs.gnu.org, Remco van 't Veer <remco@remworks.net>
Subject: bug#58880: [PATCH v3 1/2] guix gc: Round MiBs in user feedback.
Date: Mon, 23 Jan 2023 19:17:14 +0100	[thread overview]
Message-ID: <20230123181715.30822-1-remco@remworks.net> (raw)
In-Reply-To: <5z3zneF8G6Y-8ua-MISE2H5Kth7yWekIe_gGm8a9F35IewpTkm_rscQL5eIP0tKeUJM7LGsNWlELU0DON2pYG5EfMkQoyXM5cA8NRVZRy8k=@proton.me>

* guix/scripts/gc.scm (guix-gc): Round MiBs in user feedback.
---
 guix/scripts/gc.scm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/guix/scripts/gc.scm b/guix/scripts/gc.scm
index 5e775c5cdb..2bbfb26d5d 100644
--- a/guix/scripts/gc.scm
+++ b/guix/scripts/gc.scm
@@ -260,10 +260,10 @@ (define-command (guix-gc . args)
     ;; Attempt to have at least SPACE bytes available in STORE.
     (let ((free (free-disk-space (%store-prefix))))
       (if (> free space)
-          (info (G_ "already ~h MiBs available on ~a, nothing to do~%")
+          (info (G_ "already ~,2h MiBs available on ~a, nothing to do~%")
                 (/ free 1024. 1024.) (%store-prefix))
           (let ((to-free (- space free)))
-            (info (G_ "freeing ~h MiBs~%") (/ to-free 1024. 1024.))
+            (info (G_ "freeing ~,2h MiBs~%") (/ to-free 1024. 1024.))
             (collect-garbage store to-free)))))
 
   (define (delete-generations store pattern)
@@ -327,10 +327,10 @@ (define-command (guix-gc . args)
              (ensure-free-space store free-space))
             (min-freed
              (let-values (((paths freed) (collect-garbage store min-freed)))
-              (info (G_ "freed ~h MiBs~%") (/ freed 1024. 1024.))))
+              (info (G_ "freed ~,2h MiBs~%") (/ freed 1024. 1024.))))
             (else
              (let-values (((paths freed) (collect-garbage store)))
-              (info (G_ "freed ~h MiBs~%") (/ freed 1024. 1024.)))))))
+              (info (G_ "freed ~,2h MiBs~%") (/ freed 1024. 1024.)))))))
         ((list-roots)
          (assert-no-extra-arguments)
          (list-roots))
-- 
2.39.1





  parent reply	other threads:[~2023-01-23 18:18 UTC|newest]

Thread overview: 20+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2022-10-29 23:50 bug#58880: guix gc notation broken Christian Miller via Bug reports for GNU Guix
2022-10-30  0:12 ` Christian Miller via Bug reports for GNU Guix
2022-11-25 20:33 ` bug#58880: [PATCH] guix gc: Round MiBs in user feedback Remco van 't Veer
2023-01-21 16:26   ` bug#58880: 'guix gc' does not round the amount of disk space freed zimoun
2023-01-21 16:52     ` Remco van 't Veer
2023-01-22 14:49       ` bug#58880: Patch impacting translation (was Re: bug#58880: 'guix gc' does not round the amount of disk space freed) zimoun
2023-01-22 16:43         ` Julien Lepiller
2023-01-23  7:51           ` zimoun
2023-01-23 13:44             ` bokr
2023-01-24  9:41               ` Simon Tournier
2023-01-23 13:01 ` bug#58880: [PATCH v2 0/2] split into 2 commits and rebased on master Remco van 't Veer
2023-01-23 13:01   ` bug#58880: [PATCH v2 1/2] guix gc: Round MiBs in user feedback Remco van 't Veer
2023-01-23 13:01   ` bug#58880: [PATCH v2 2/2] nls: Update translation keys for guix gc Remco van 't Veer
2023-01-23 13:14     ` Julien Lepiller
2023-01-23 18:16       ` Remco van 't Veer
2023-01-24 15:14     ` pelzflorian (Florian Pelz)
2023-01-25  7:47       ` Remco van 't Veer
2023-05-31 21:41         ` bug#58880: 'guix gc' does not round the amount of disk space freed pelzflorian (Florian Pelz)
2023-01-23 18:17 ` Remco van 't Veer [this message]
2023-01-23 18:17   ` bug#58880: [PATCH v3 2/2] nls: Update translation keys for guix gc Remco van 't Veer

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20230123181715.30822-1-remco@remworks.net \
    --to=remco@remworks.net \
    --cc=58880@debbugs.gnu.org \
    --cc=julien@lepiller.eu \
    --cc=zimon.toutoune@gmail.com \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/guix.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.