diff options
-rw-r--r-- | gnu/bootloader/u-boot.scm | 5 | ||||
-rw-r--r-- | guix/import/buildroot.scm | 6 |
2 files changed, 9 insertions, 2 deletions
diff --git a/gnu/bootloader/u-boot.scm b/gnu/bootloader/u-boot.scm index 001edc5dac..efd696d4a2 100644 --- a/gnu/bootloader/u-boot.scm +++ b/gnu/bootloader/u-boot.scm @@ -91,10 +91,13 @@ (write-file-on-device u-boot (stat:size (stat u-boot)) device (* 512 512))))) -(define install-buildroot-u-boot +(define (install-buildroot-u-boot post-image-script post-script-args) #~(lambda (bootloader device mount-point) ;; FIXME: Take genimage and a custom config from buildroot in order to install bootloader. #$genimage + #$buildroot-boards + #$post-image-script + #$post-script-args #f)) diff --git a/guix/import/buildroot.scm b/guix/import/buildroot.scm index 0ae06de5ec..c21614dfe7 100644 --- a/guix/import/buildroot.scm +++ b/guix/import/buildroot.scm @@ -140,4 +140,8 @@ ,(if (eq? (assoc-ref buildroot-configuration "BR2_aarch64") 'y) "aarch64-linux-gnu" "arm-linux-gnueabihf"))) - (installer install-buildroot-u-boot)))))))) + (installer (install-buildroot-u-boot + ,(assoc-ref buildroot-configuration + "BR2_ROOTFS_POST_IMAGE_SCRIPT") + ,(assoc-ref buildroot-configuration + "BR2_ROOTFS_POST_SCRIPT_ARGS")))))))))) |