diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2019-05-20 11:48:57 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2019-05-20 11:48:57 +0200 |
| commit | 99f47b53f755f0a6cb15615c2b9a449a930e82e9 (patch) | |
| tree | 853674ba28bc780e7916b2ccf044285d71c770b8 /gnu/installer/newt | |
| parent | 8d036f3ecf3b837e8f38c2dca9f8a78568cc664b (diff) | |
| parent | fb2abbd6f5abac8ae0fec594594dd54ff7e3f4db (diff) | |
| download | guix-99f47b53f755f0a6cb15615c2b9a449a930e82e9.tar guix-99f47b53f755f0a6cb15615c2b9a449a930e82e9.tar.gz | |
Merge branch 'version-1.0.1'
Diffstat (limited to 'gnu/installer/newt')
| -rw-r--r-- | gnu/installer/newt/partition.scm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/gnu/installer/newt/partition.scm b/gnu/installer/newt/partition.scm index abc8bdcc03..cd9d46316a 100644 --- a/gnu/installer/newt/partition.scm +++ b/gnu/installer/newt/partition.scm @@ -751,12 +751,8 @@ by pressing the Exit button.~%~%"))) (disk (mklabel device label))) (disk-commit disk) disk))) - (initial-partitions (disk-partitions disk)) (scheme (symbol-append method '- (run-scheme-page))) - (user-partitions (append - (auto-partition! disk #:scheme scheme) - (create-special-user-partitions - initial-partitions)))) + (user-partitions (auto-partition! disk #:scheme scheme))) (run-disk-page (list disk) user-partitions #:guided? #t))) ((eq? method 'manual) |