installer: Remove unused variable.
* gnu/installer/newt.scm (newt-run-command): Remove 'displayed-command'.
This commit is contained in:
		
							parent
							
								
									26e39b1258
								
							
						
					
					
						commit
						0916a79f8c
					
				
					 1 changed files with 0 additions and 4 deletions
				
			
		| 
						 | 
					@ -117,10 +117,6 @@ report it by email to ~a.") uploaded-name %guix-bug-report-address)
 | 
				
			||||||
  (define (line-accumulator line)
 | 
					  (define (line-accumulator line)
 | 
				
			||||||
    (set! command-output
 | 
					    (set! command-output
 | 
				
			||||||
          (string-append/shared command-output line "\n")))
 | 
					          (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)
 | 
					  (define result (run-external-command-with-line-hooks (list line-accumulator)
 | 
				
			||||||
                                                       args))
 | 
					                                                       args))
 | 
				
			||||||
  (define exit-val (status:exit-val result))
 | 
					  (define exit-val (status:exit-val result))
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue