vm: Fix typo.
Regression introduced in e38e18f
.
* guix/build/vm.scm (initialize-hard-disk)[partition]: Use a string.
This commit is contained in:
parent
5bbd6bf181
commit
9bea3b42b4
|
@ -168,7 +168,7 @@ further populate the partition."
|
||||||
(string-append target-directory (%store-directory)))
|
(string-append target-directory (%store-directory)))
|
||||||
|
|
||||||
(define partition
|
(define partition
|
||||||
(string-append device 1))
|
(string-append device "1"))
|
||||||
|
|
||||||
(unless (initialize-partition-table device
|
(unless (initialize-partition-table device
|
||||||
#:partition-size
|
#:partition-size
|
||||||
|
|
Loading…
Reference in New Issue