diff options
| -rw-r--r-- | gnu/build/linux-boot.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gnu/build/linux-boot.scm b/gnu/build/linux-boot.scm index ea1971ff9c..fa6f417907 100644 --- a/gnu/build/linux-boot.scm +++ b/gnu/build/linux-boot.scm @@ -400,8 +400,9 @@ to it are lost." (when (procedure? pre-mount) ;; Do whatever actions are needed before mounting--e.g., installing - ;; device mappings. - (pre-mount)) + ;; device mappings. Error out when the return value is false. + (unless (pre-mount) + (error "pre-mount actions failed"))) ;; Mount the specified file systems. (for-each mount-file-system |