aboutsummaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-09-04 23:22:34 +0200
committerLudovic Courtès <ludo@gnu.org>2013-09-05 00:46:09 +0200
commit29804e6eb2a755c123f2a73fb843867846cb9111 (patch)
treed1732efe37fe7b6fdbec4e52b205276d8b98e5e9 /guix
parent7c1d8146a770d6b37b35cefc0ad8662f4c07df62 (diff)
downloadgnu-guix-29804e6eb2a755c123f2a73fb843867846cb9111.tar
gnu-guix-29804e6eb2a755c123f2a73fb843867846cb9111.tar.gz
gnu: linux-initrd: Fix creation of /dev/tty nodes.
* guix/build/linux-initrd.scm (make-essential-device-nodes): Make /dev/tty. Change from 'block-special' to 'char-special' for /dev/tty* nodes.
Diffstat (limited to 'guix')
-rw-r--r--guix/build/linux-initrd.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/build/linux-initrd.scm b/guix/build/linux-initrd.scm
index 208ad711ef..b5404da7f0 100644
--- a/guix/build/linux-initrd.scm
+++ b/guix/build/linux-initrd.scm
@@ -80,10 +80,12 @@
(mknod (scope "dev/vda2") 'block-special #o644 (device-number 8 2))
;; TTYs.
+ (mknod (scope "dev/tty") 'char-special #o600
+ (device-number 5 0))
(let loop ((n 0))
(and (< n 50)
(let ((name (format #f "dev/tty~a" n)))
- (mknod (scope name) 'block-special #o644
+ (mknod (scope name) 'char-special #o600
(device-number 4 n))
(loop (+ 1 n)))))