diff options
| author | Mathieu Othacehe <othacehe@gnu.org> | 2022-08-30 19:16:36 +0200 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2022-08-30 19:29:58 +0200 |
| commit | 192b7d0c0b0958d6c87df6084a644e0c7eca2ec0 (patch) | |
| tree | d964d7ae646bf1bb1da212cd9a528ad8f6e37977 | |
| parent | 61bbff9d5015d0f60ad68f1814e0a0b0ea0592b8 (diff) | |
| download | guix-192b7d0c0b0958d6c87df6084a644e0c7eca2ec0.tar.gz | |
build: image: Make partition uuid optional.
The uuid field of <partition> defaults to #false. This should be reflected when creating the partition. * gnu/build/image.scm (make-ext-image): Make it optional.
| -rw-r--r-- | gnu/build/image.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gnu/build/image.scm b/gnu/build/image.scm index 361ed3c920..2327cfbb45 100644 --- a/gnu/build/image.scm +++ b/gnu/build/image.scm @@ -86,7 +86,10 @@ turn doesn't take any constant overhead into account, force a 1-MiB minimum." (journal-options "lazy_itable_init=1,lazy_journal_init=1")) (apply invoke `("fakeroot" "mke2fs" "-t" ,fs "-d" ,root - "-L" ,label "-U" ,(uuid->string uuid) + "-L" ,label + ,@(if uuid + `("-U" ,(uuid->string uuid)) + '()) "-E" ,(format #f "root_owner=~a:~a,~a" owner-uid owner-gid journal-options) ,@fs-options |