me
/
guix
Archived
1
0
Fork 0
Code

distro: Provide a more descriptive report when a bootstrap binary is missing. 

* distro/packages/base.scm (%bootstrap-guile): Error out when
  `search-bootstrap-binary' returns #f.
master
Ludovic Courtès 2012-10-18 23:36:29 +02:00
parent d6e8777688
commit a5a349f302
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
distro/packages/base.scm
View File

@ -1391,7 +1391,10 @@ with the Linux kernel.")
(build (lambda* (store name source inputs #:key outputs system) (build (lambda* (store name source inputs #:key outputs system)
(define (->store file) (define (->store file)
(add-to-store store file #t #t "sha256" (add-to-store store file #t #t "sha256"
(search-bootstrap-binary file system))) (or (search-bootstrap-binary file
system)
(error "bootstrap binary not found"
file system))))
(let* ((tar (->store "tar")) (let* ((tar (->store "tar"))
(xz (->store "xz")) (xz (->store "xz"))