diff --git a/gnu/installer/kernel.scm b/gnu/installer/kernel.scm index a07d24d09a6..2700931d402 100644 --- a/gnu/installer/kernel.scm +++ b/gnu/installer/kernel.scm @@ -27,7 +27,8 @@ str) (define (kernel->configuration kernel dry-run?) - (if (string-prefix? "Hurd" kernel) + (if (and (string? kernel) + (string-prefix? "Hurd" kernel)) `((kernel %hurd-default-operating-system-kernel) ,(comment (G_ ";; \"noide\" disables the gnumach IDE driver, enabling rumpdisk.\n")) (kernel-arguments '("noide"))