[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
35/80: installer: Make minumum-store-size variable global.
From: |
John Darrington |
Subject: |
35/80: installer: Make minumum-store-size variable global. |
Date: |
Tue, 3 Jan 2017 15:49:43 +0000 (UTC) |
jmd pushed a commit to branch wip-installer
in repository guix.
commit 417a7e253a5a54245d2af4cd5ccd9a627ebc0941
Author: John Darrington <address@hidden>
Date: Mon Dec 26 10:38:02 2016 +0100
installer: Make minumum-store-size variable global.
* gnu/system/installer/filesystems.scm (minimum-store-size): Export
variable.
* gnu/system/new.scm: Use variable minimum-store-size instead of literal
number.
---
gnu/system/installer/filesystems.scm | 3 ++-
gnu/system/installer/new.scm | 2 +-
2 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/gnu/system/installer/filesystems.scm
b/gnu/system/installer/filesystems.scm
index 29d00fd..f3242ab 100644
--- a/gnu/system/installer/filesystems.scm
+++ b/gnu/system/installer/filesystems.scm
@@ -28,7 +28,8 @@
#:use-module (ncurses curses)
#:use-module (ice-9 format)
#:use-module (srfi srfi-1)
-
+
+ #:export (minimum-store-size)
#:export (filesystem-task-complete?)
#:export (make-filesystem-page))
diff --git a/gnu/system/installer/new.scm b/gnu/system/installer/new.scm
index 01ff36d..aed6021 100644
--- a/gnu/system/installer/new.scm
+++ b/gnu/system/installer/new.scm
@@ -69,7 +69,7 @@
`(
(disk . ,(make-task partition-menu-title
'()
- (lambda () (< 12000 (size-of-largest-disk)))
+ (lambda () (< minimum-store-size
(size-of-largest-disk)))
(lambda (page)
(make-disk-page
page
- 25/80: installer: Use a cleaner way of generating the lspci information., (continued)
- 25/80: installer: Use a cleaner way of generating the lspci information., John Darrington, 2017/01/03
- 24/80: installer: Make "interfaces" return an alist., John Darrington, 2017/01/03
- 27/80: installer: Connect ethernet interfaces on selection., John Darrington, 2017/01/03
- 28/80: installer: Let the kernel know about (possibly) changed partitions., John Darrington, 2017/01/03
- 49/80: installer: Wrap installer in (catch #t ...), John Darrington, 2017/01/03
- 09/80: installer: Use a record instead of a list to contain tasks., John Darrington, 2017/01/03
- 29/80: installer: Deal with partition tables which are (partially) corrupt., John Darrington, 2017/01/03
- 37/80: installer: Improve dependencies on the final task., John Darrington, 2017/01/03
- 31/80: gnu: Add service to start the installer in installation-os., John Darrington, 2017/01/03
- 36/80: installer: Remove ad-hoc completed predicate and use standard one., John Darrington, 2017/01/03
- 35/80: installer: Make minumum-store-size variable global.,
John Darrington <=
- 34/80: installer: Add path to mount/umount commands in installer service., John Darrington, 2017/01/03
- 58/80: installer: Allow users to remove mount points during configuration., John Darrington, 2017/01/03
- 11/80: installer: Change "interfaces" from a variable to a procedure., John Darrington, 2017/01/03
- 14/80: installer: Add alternate method of finding TZDIR., John Darrington, 2017/01/03
- 13/80: installer: Use call-with-temporary-output-file., John Darrington, 2017/01/03
- 22/80: installer: Return slurped lines in their correct order., John Darrington, 2017/01/03
- 16/80: installer: Use %default-subsitute-urls instead of our own variable., John Darrington, 2017/01/03
- 10/80: installer: Perform a task's dependencies prior to the task itself., John Darrington, 2017/01/03
- 18/80: installer: Add completion predicate for disk task., John Darrington, 2017/01/03
- 20/80: installer: Remove unused procedure., John Darrington, 2017/01/03