~ruther/guix-local

f000828575d6fe16e774162051d29b9ed025414d — Danny Milosavljevic 8 years ago c5196ac 
system: Remove circular dependency between (gnu system) and (gnu system grub).

Followup to 087efec496b91e3763be2e11e208d4a8f4ef3d43.

* gnu/system.scm: (operating-system-bootcfg): Refer to (gnu system grub)
by module-ref.
patch browse .tar.gz 
1 files changed, 5 insertions(+), 3 deletions(-)

M gnu/system.scm

M gnu/system.scm => gnu/system.scm +5 -3
@@ 847,9 847,11 @@ populate the \"old entries\" menu."
                           (uuid->string (file-system-device root-fs))
                           (file-system-device root-fs)))
       (entry (operating-system-boot-parameters os system root-device)))
    ((@@ (gnu system grub) grub-configuration-file) (operating-system-bootloader os)
                             (list entry)
                              #:old-entries old-entries)))
    ((module-ref (resolve-interface '(gnu system grub))
                 'grub-configuration-file)
     (operating-system-bootloader os)
     (list entry)
     #:old-entries old-entries)))

(define (fs->boot-device fs)
  "Given FS, a <file-system> object, return a value suitable for use as the