1 files changed, 1 insertions, 1 deletions
diff --git a/GLWidget.hs b/GLWidget.hs
index 8a9d23e..50e2e64 100644
--- a/GLWidget.hs
+++ b/GLWidget.hs
@@ -88,7 +88,7 @@ runGLApp mk methods = do
    window <- do
        w <- windowNew WindowTypeToplevel
-        windowSetDefaultSize    w 760 760
+        windowSetDefaultSize    w 720 720
        windowSetTitle          w (glTitle methods)
        containerSetBorderWidth w 0
        _ <- on w #deleteEvent $ \_ -> mainQuit >> return True

diff --git a/GLWidget.hs b/GLWidget.hs index 8a9d23e..50e2e64 100644 --- a/GLWidget.hs +++ b/GLWidget.hs
@@ -88,7 +88,7 @@ runGLApp mk methods = do
88		88
89	window <- do	89	window <- do
90	w <- windowNew WindowTypeToplevel	90	w <- windowNew WindowTypeToplevel
91	windowSetDefaultSize w 760 760	91	windowSetDefaultSize w 720 720
92	windowSetTitle w (glTitle methods)	92	windowSetTitle w (glTitle methods)
93	containerSetBorderWidth w 0	93	containerSetBorderWidth w 0
94	_ <- on w #deleteEvent $ \_ -> mainQuit >> return True	94	_ <- on w #deleteEvent $ \_ -> mainQuit >> return True