diff options
| author | Zheng Junjie <zhengjunjie@iscas.ac.cn> | 2024-01-10 15:24:00 +0800 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2024-01-12 17:26:31 +0100 |
| commit | c245a54aab348642178129a9aad501b81a3089b4 (patch) | |
| tree | 66e34e21f287f6271e9a1d5d20f17c856bfbdfb0 /guix/scripts | |
| parent | acd688a06232a7a7e9e9c0a608c23f48a4c01be7 (diff) | |
scripts: size: Fix `guix size` with --system argument.
guix/scripts/size.scm (guix-size): Parameterize %current-system.
Change-Id: Ia0c1ebff4397aa211f73360925f7c688d59b515a
Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
Diffstat (limited to 'guix/scripts')
| -rw-r--r-- | guix/scripts/size.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/guix/scripts/size.scm b/guix/scripts/size.scm index d26ed98388..8a8676a16f 100644 --- a/guix/scripts/size.scm +++ b/guix/scripts/size.scm @@ -317,7 +317,8 @@ Report the size of the PACKAGE or STORE-ITEM, with its dependencies.\n")) ;; Turn off grafts because (1) substitute servers do not serve grafted ;; packages, and (2) they do not make any difference on the ;; resulting size. - (parameterize ((%graft? #f)) + (parameterize ((%graft? #f) + (%current-system system)) (with-store store (set-build-options store #:use-substitutes? #t |