guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

127/197: gurses: Remove box from form popup window.


From: Danny Milosavljevic
Subject: 127/197: gurses: Remove box from form popup window.
Date: Mon, 3 Jul 2017 20:37:12 -0400 (EDT)

dannym pushed a commit to branch wip-installer-2
in repository guix.

commit c9be1543893ac7e3c990326525f60d0ccfc97b1d
Author: John Darrington <address@hidden>
Date:   Fri Jan 20 08:37:28 2017 +0100

    gurses: Remove box from form popup window.
    
    * gurses/form.scm (make-form): Remove box in menu popup window.
---
 gurses/form.scm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/gurses/form.scm b/gurses/form.scm
index 4ee4ac9..7dac5bc 100644
--- a/gurses/form.scm
+++ b/gurses/form.scm
@@ -137,9 +137,8 @@ label eq? to N"
                                          (menu (make-menu things)))
                                      (make-field
                                       symbol label width menu
-                                      (let ((p (newwin (+ 2 (length things))
-                                                       (+ 4 width) 0 0 #:panel 
#f)))
-                                        (box p 0 0)
+                                      (let ((p (newwin (length things)
+                                                        width 0 0 #:panel #f)))
                                         (menu-post menu p)
                                         p)
                                       "" 0)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]