me/guix
Archived
1
0
Fork 0
Code Activity

hurd-boot: Remove duplicate calls to 'scope'.

Browse source 
* gnu/build/hurd-boot.scm (set-hurd-device-translators): Remove duplicate
calls to 'scope'.
This commit is contained in:
Jan (janneke) Nieuwenhuizen 2020-06-25 17:07:25 +02:00
parent d8a046d560
commit db08a0d203
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/build/hurd-boot.scm
View file

@ -232,14 +232,14 @@ set."
#o666))) #o666)))
(for-each scope-set-translator servers) (for-each scope-set-translator servers)
(mkdir* (scope "dev/vcs/1")) (mkdir* "dev/vcs/1")
(mkdir* (scope "dev/vcs/2")) (mkdir* "dev/vcs/2")
(mkdir* (scope "dev/vcs/2")) (mkdir* "dev/vcs/2")
(rename-file (scope "/dev/console") (scope "/dev/console-")) (rename-file (scope "dev/console") (scope "dev/console-"))
(for-each scope-set-translator devices) (for-each scope-set-translator devices)
(false-if-EEXIST (symlink "/dev/random" (scope "dev/urandom"))) (false-if-EEXIST (symlink "/dev/random" (scope "dev/urandom")))
(mkdir* (scope "dev/fd")) (mkdir* "dev/fd")
(false-if-EEXIST (symlink "/dev/fd/0" (scope "dev/stdin"))) (false-if-EEXIST (symlink "/dev/fd/0" (scope "dev/stdin")))
(false-if-EEXIST (symlink "/dev/fd/1" (scope "dev/stdout"))) (false-if-EEXIST (symlink "/dev/fd/1" (scope "dev/stdout")))
(false-if-EEXIST (symlink "/dev/fd/2" (scope "dev/stderr")))) (false-if-EEXIST (symlink "/dev/fd/2" (scope "dev/stderr"))))