~ruther/guix-local

ced0106a44ebb5f96bfda8d4d4bc05bbb18c263d — Ludovic Courtès 11 years ago 5c88ac5
linux-boot: Make more disk partition block devices.

Reported by nebuli on #guix.

* gnu/build/linux-boot.scm (make-disk-device-nodes): Make 16 block
  devices for disk partitions.
1 files changed, 1 insertions(+), 1 deletions(-)

M gnu/build/linux-boot.scm
M gnu/build/linux-boot.scm => gnu/build/linux-boot.scm +1 -1
@@ 93,7 93,7 @@ Return the value associated with OPTION, or #f on failure."
with the given MAJOR number, starting with MINOR."
  (mknod base 'block-special #o644 (device-number major minor))
  (let loop ((i 1))
    (when (< i 6)
    (when (< i 16)
      (mknod (string-append base (number->string i))
             'block-special #o644 (device-number major (+ minor i)))
      (loop (+ i 1)))))