ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 05:48:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

linux-boot: Update 'make-hurd-device-nodes'.

Browse source 
* gnu/build/linux-boot.scm (make-hurd-device-nodes): Avoid de-duplication of
device mount points; also create mount points for /servers/.
This commit is contained in:
Jan (janneke) Nieuwenhuizen 2020-05-24 12:41:32 +02:00 committed by Jan Nieuwenhuizen
parent 1428926f1f
commit 6cea61f2fa
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273
1 changed files with 15 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
gnu/build/linux-boot.scm
View file

@ -337,6 +337,7 @@ (define (scope dir)
(for-each (lambda (file)
(call-with-output-file (scope file)
(lambda (port)
(display file port) ;avoid hard-linking
(chmod port #o666))))
'("dev/null"
"dev/zero"
@ -347,6 +348,20 @@ (define (scope dir)
;; console-run on first boot.
(mkdir (scope "servers"))
(for-each (lambda (file)
(call-with-output-file (scope (string-append "servers/" file))
(lambda (port)
(display file port) ;avoid hard-linking
(chmod port #o444))))
'("startup"
"exec"
"proc"
"password"
"default-pager"
"crash-dump-core"
"kill"
"suspend"))
(mkdir (scope "servers/socket"))
;; Don't create /servers/socket/1 & co: runsystem does that on first boot.