diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-12-22 14:24:49 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-12-23 22:14:15 +0100 |
| commit | 62b845c5e2c28a360102f095548e3dc3e9cf3200 (patch) | |
| tree | d2075e1220e6bffff2ef9e9aede5e6ad166343c5 | |
| parent | 1a1b54b5bd59757af8f6fdbf202c11a65f8d8dd8 (diff) | |
| download | patches-62b845c5e2c28a360102f095548e3dc3e9cf3200.tar patches-62b845c5e2c28a360102f095548e3dc3e9cf3200.tar.gz | |
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'.
| -rw-r--r-- | guix/scripts/offload.scm | 2 |
1 files changed, 1 insertions, 1 deletions
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))) |