From ced0106a44ebb5f96bfda8d4d4bc05bbb18c263d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Thu, 13 Nov 2014 13:34:31 +0100
Subject: [PATCH] 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.
---
gnu/build/linux-boot.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/gnu/build/linux-boot.scm b/gnu/build/linux-boot.scm
index a58232c8151..001c52fa3df 100644
--- a/gnu/build/linux-boot.scm
+++ b/gnu/build/linux-boot.scm
@@ -93,7 +93,7 @@ (define* (make-disk-device-nodes base major #:optional (minor 0))
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)))))
--
GitLab