aboutsummaryrefslogtreecommitdiff
path: root/gnu/installer/newt.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2022-11-03 18:01:22 +0100
committerLudovic Courtès <ludo@gnu.org>2022-11-09 23:59:42 +0100
commit0916a79f8c7e1e489d663fbddab0631d2325806d (patch)
tree978559b003d0124dbc376bc9113e5920801d9248 /gnu/installer/newt.scm
parent26e39b1258801051352fcfb97313cf1541e80c2c (diff)
downloadguix-0916a79f8c7e1e489d663fbddab0631d2325806d.tar
guix-0916a79f8c7e1e489d663fbddab0631d2325806d.tar.gz
installer: Remove unused variable.
* gnu/installer/newt.scm (newt-run-command): Remove 'displayed-command'.
Diffstat (limited to 'gnu/installer/newt.scm')
-rw-r--r--gnu/installer/newt.scm4
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))