From bef0c9afe8ea778f92f1960826e0a011f7a531c0 Mon Sep 17 00:00:00 2001 From: hasufell Date: Wed, 1 Oct 2014 03:03:39 +0200 Subject: [PATCH] Adjust main window size --- Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Main.hs b/Main.hs index 3a0542e..20be445 100644 --- a/Main.hs +++ b/Main.hs @@ -43,7 +43,7 @@ main = do boxPackStart box3 fileButton PackNatural 0 -- adjust properties - set window [windowDefaultWidth := 700, windowDefaultHeight := 700, + set window [windowDefaultWidth := 600, windowDefaultHeight := 700, windowTitle := "Computergrafik"] set box2 [buttonBoxLayoutStyle := ButtonboxCenter] set box3 [buttonBoxLayoutStyle := ButtonboxCenter]