installer: Limit listbox height.

[jackhill/guix/guix.git] / gnu / installer / newt.scm

diff --git a/gnu/installer/newt.scm b/gnu/installer/newt.scm
index fdab721..a1cbeca 100644 (file)
--- a/gnu/installer/newt.scm
+++ b/gnu/installer/newt.scm
@@ -46,6 +46,7 @@
   (newt-init)
   (clear-screen)
   (set-screen-size!)
+  (syslog "Display is ~ax~a.~%" (screen-columns) (screen-rows))
   (push-help-line
    (format #f (G_ "Press <F1> for installation parameters."))))