diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2018-03-20 17:01:41 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2018-03-20 17:01:41 +0100 |
| commit | 248871e00667fc5c4b40ab9816ca8d5df47d40d7 (patch) | |
| tree | 0e7101e40c64d456885eae47d26202b6fca7a4ff | |
| parent | 88b87c352f61a576f4a764774636adc056811624 (diff) | |
| download | patches-248871e00667fc5c4b40ab9816ca8d5df47d40d7.tar patches-248871e00667fc5c4b40ab9816ca8d5df47d40d7.tar.gz | |
build-system/gnu: Fix typo.
* guix/build/gnu-build-system.scm (dump-file-contents): Fix typo in
'string-pad' argument.
| -rw-r--r-- | guix/build/gnu-build-system.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/build/gnu-build-system.scm b/guix/build/gnu-build-system.scm index 2c0f60c9ba..a39a884852 100644 --- a/guix/build/gnu-build-system.scm +++ b/guix/build/gnu-build-system.scm @@ -342,7 +342,7 @@ makefiles." (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) |