From 62b845c5e2c28a360102f095548e3dc3e9cf3200 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Sat, 22 Dec 2018 14:24:49 +0100
Subject: [PATCH] offload: Display the normalized load in 'guix offload status'
 output.

Fixes a regression introduced in
bbe66a530a014e8146d63002a5294941e935f863 whereby the actual
load (non-normalized) would be displayed.

* guix/scripts/offload.scm (check-machine-status): Add call to
'normalized-load'.
---
 guix/scripts/offload.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/scripts/offload.scm b/guix/scripts/offload.scm
index 1e0ea1c4c6..bfdaa3c011 100644
--- a/guix/scripts/offload.scm
+++ b/guix/scripts/offload.scm
@@ -733,7 +733,7 @@ machine."
                           (utsname:sysname uts) (utsname:release uts)
                           (utsname:machine uts)
                           (utsname:nodename uts)
-                          load
+                          (normalized-load machine load)
                           (/ free (expt 2 20) 1.))))
               machines)))