Jack Hill writes:
> Hi Guix, > > Today after a guix pull to commit > e3545ffcf95bffbbd967efd852715f4f0a9be290, guix system reconfigure > fails to install grub (bios grub on x86_64) with > > guix system: error: failed to install bootloader > /gnu/store/45myfaqas69fnp3mfbqlsf9lafm30cl0-bootloader-installer > > /gnu/store/45myfaqas69fnp3mfbqlsf9lafm30cl0-bootloader-installer is > > (eval-when (expand load eval) (set! %load-path (cons > "/gnu/store/wa7bn283y9pg2h5g75j1fmqbp1m5js7w-module-import" (append > (map (lambda (extension) (string-append extension "/share/guile/site/" > (effective-version))) (quote ())) %load-path))) (set! > %load-compiled-path (cons > "/gnu/store/w5a1xk656i0sw15mqj7bz8zp130c8m27-module-import-compiled" > (append (map (lambda (extension) (string-append extension > "/lib/guile/" (effective-version) "/site-ccache")) (quote ())) > %load-compiled-path))))(begin (use-modules (gnu build bootloader) > (guix build utils) (ice-9 binary-ports) (srfi srfi-34) (srfi srfi-35)) > (guard (c ((message-condition? c) (format (current-error-port) "error: > ~a~%" (condition-message c)) (exit 1))) ((lambda (bootloader device > mount-point) (let ((grub (string-append bootloader > "/sbin/grub-install")) (install-dir (string-append mount-point > "/boot"))) (setenv "GRUB_ENABLE_CRYPTODISK" "y") (invoke/quiet grub > "--no-floppy" "--target=i386-pc" "--boot-directory" install-dir > device))) "/gnu/store/shbswxl2g7n6fvi6gq45bvan4saygkv2-grub-2.02" > "/dev/sda" "/") (format #t "bootloader successfully installed on > '~a'~%" device))) > I can replicate this bug, however it is still successfully installing a new system configuration. The error printout seems erroneous (pun intended). I am sure there is a regression somewhere, but it does not seem to adversely effect the method in question.
