mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-08 07:56:16 -05:00
build-system/gnu: Fix typo.
* guix/build/gnu-build-system.scm (dump-file-contents): Fix typo in 'string-pad' argument.
This commit is contained in:
parent
88b87c352f
commit
248871e006
1 changed files with 1 additions and 1 deletions
|
@ -342,7 +342,7 @@ (define* (dump-file-contents directory file-regexp
|
|||
(define (dump file)
|
||||
(let ((prefix (string-append "\n--- " file " ")))
|
||||
(display (if (< (string-length prefix) 78)
|
||||
(string-pad-right prefix 78 #\---)
|
||||
(string-pad-right prefix 78 #\-)
|
||||
prefix)
|
||||
port)
|
||||
(display "\n\n" port)
|
||||
|
|
Loading…
Reference in a new issue