me
/
guix
Archived
1
0
Fork 0
Code

image: 'system-image' throws when given an incorrect image format. 

Previously 'system-image' would return *unspecified* in that case,
leading to a wrong-type-arg error crash down the road.

* gnu/system/image.scm (system-image): Add 'else' clause.
master
Ludovic Courtès 2022-07-01 09:42:53 +02:00
parent 0483c71cc5
commit e871c3a857
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gnu/system/image.scm
View File

@ -842,7 +842,10 @@ image, depending on IMAGE format."
;; This happens if some limits are exceeded, see: ;; This happens if some limits are exceeded, see:
;; https://lists.gnu.org/archive/html/grub-devel/2020-06/msg00048.html ;; https://lists.gnu.org/archive/html/grub-devel/2020-06/msg00048.html
#:grub-mkrescue-environment #:grub-mkrescue-environment
'(("MKRESCUE_SED_MODE" . "mbr_only")))))))) '(("MKRESCUE_SED_MODE" . "mbr_only"))))
(else
(raise (formatted-message
(G_ "~a: unsupported image format") image-format)))))))
;; ;;