diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2022-11-03 18:01:22 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2022-11-09 23:59:42 +0100 |
| commit | 0916a79f8c7e1e489d663fbddab0631d2325806d (patch) | |
| tree | 978559b003d0124dbc376bc9113e5920801d9248 | |
| parent | 26e39b1258801051352fcfb97313cf1541e80c2c (diff) | |
| download | guix-0916a79f8c7e1e489d663fbddab0631d2325806d.tar guix-0916a79f8c7e1e489d663fbddab0631d2325806d.tar.gz | |
installer: Remove unused variable.
* gnu/installer/newt.scm (newt-run-command): Remove
'displayed-command'.
| -rw-r--r-- | gnu/installer/newt.scm | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/gnu/installer/newt.scm b/gnu/installer/newt.scm index 0bd0856219..c486788ed4 100644 --- a/gnu/installer/newt.scm +++ b/gnu/installer/newt.scm @@ -117,10 +117,6 @@ report it by email to ~a.") uploaded-name %guix-bug-report-address) (define (line-accumulator line) (set! command-output (string-append/shared command-output line "\n"))) - (define displayed-command - (string-join - (map (lambda (s) (string-append "\"" s "\"")) args) - " ")) (define result (run-external-command-with-line-hooks (list line-accumulator) args)) (define exit-val (status:exit-val result)) |