dannym pushed a commit to branch wip-installer-2
in repository guix.
commit f95fca58888023d8d1932651c009bc1a6018a057
Author: John Darrington <[email protected]>
Date: Fri Jan 20 08:31:53 2017 +0100
installer: mount-points page: Enlarge the forms window.
* gnu/system/installer/mount-point.scm (mount-point-page-init): Make
the window containing the form cover as much space as possible.
---
gnu/system/installer/mount-point.scm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/gnu/system/installer/mount-point.scm
b/gnu/system/installer/mount-point.scm
index fe060a1..b7a1876 100644
--- a/gnu/system/installer/mount-point.scm
+++ b/gnu/system/installer/mount-point.scm
@@ -112,7 +112,10 @@
(nav (make-buttons my-buttons 1))
(fw (derwin (inner pr)
- (length my-fields)
+ (-
+ (getmaxy (inner pr))
+ (getmaxy text-window)
+ (getmaxy bwin))
(getmaxx (inner pr))
(getmaxy text-window) 0 #:panel #f))
