aboutsummaryrefslogtreecommitdiff
path: root/src/infrastructure
diff options
context:
space:
mode:
authorEuAndreh <eu@euandre.org>2023-03-20 10:04:28 -0300
committerEuAndreh <eu@euandre.org>2023-03-20 10:04:28 -0300
commitf057a8f3a3448d8766134c6dbbcf5a8e3eea25c2 (patch)
tree5349bc5c79f5cd91793cf12d423bafae21936301 /src/infrastructure
parentManage public SSH files as "extra-etc-file" instead of like a secret (diff)
downloadtoph-f057a8f3a3448d8766134c6dbbcf5a8e3eea25c2.tar.gz
toph-f057a8f3a3448d8766134c6dbbcf5a8e3eea25c2.tar.xz
system.scm: Better handling of newline at the end of all read files
Notes
See CI logs with: git notes --ref=refs/notes/ci-logs show f057a8f3a3448d8766134c6dbbcf5a8e3eea25c2 git notes --ref=refs/notes/ci-data show f057a8f3a3448d8766134c6dbbcf5a8e3eea25c2 Exit status: 0 Duration: 16
Diffstat (limited to 'src/infrastructure')
-rw-r--r--src/infrastructure/guix/system.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/infrastructure/guix/system.scm b/src/infrastructure/guix/system.scm
index d591c2b..ed34f75 100644
--- a/src/infrastructure/guix/system.scm
+++ b/src/infrastructure/guix/system.scm
@@ -56,7 +56,8 @@
textual-ports:get-string-all)))
(define (file s)
- (slurp (path s)))
+ (string-append (slurp (path s))
+ "\n"))
(define (script name content)
(package
@@ -75,8 +76,7 @@
(mkdir-p bin)
(call-with-output-file prog
(lambda (port)
- (display #$content port)
- (newline port)))
+ (display #$content port)))
(chmod prog #o755)))))
(home-page #f)
(synopsis #f)