summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2018-03-20 17:01:41 +0100
committerLudovic Courtès <ludo@gnu.org>2018-03-20 17:01:41 +0100
commit248871e00667fc5c4b40ab9816ca8d5df47d40d7 (patch)
tree0e7101e40c64d456885eae47d26202b6fca7a4ff
parent88b87c352f61a576f4a764774636adc056811624 (diff)
downloadguix-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.scm2
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)