aboutsummaryrefslogtreecommitdiff
path: root/guix/scripts/size.scm
diff options
context:
space:
mode:
authorZheng Junjie <zhengjunjie@iscas.ac.cn>2024-01-10 15:24:00 +0800
committerMathieu Othacehe <othacehe@gnu.org>2024-01-12 17:26:31 +0100
commitc245a54aab348642178129a9aad501b81a3089b4 (patch)
tree66e34e21f287f6271e9a1d5d20f17c856bfbdfb0 /guix/scripts/size.scm
parentacd688a06232a7a7e9e9c0a608c23f48a4c01be7 (diff)
downloadguix-c245a54aab348642178129a9aad501b81a3089b4.tar
guix-c245a54aab348642178129a9aad501b81a3089b4.tar.gz
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/size.scm')
-rw-r--r--guix/scripts/size.scm3
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