[wxhaskell-users] Sized buttons

[Martin H. <ma...@wg...>]

Hi all,

I'm trying to write an application with quadratic buttons of size 
200x200. I' trying the following code but my buttons don't get 
quadratic. Can anybody help me please?

-- Begin Main.hs
module Main (main) where

import Graphics.UI.WX

main :: IO ()
main = start gui

gui :: IO ()
gui = do
   f <- frame      [ text := "An application" ]
   b <- button f   [ text := "Quit", on command := close f,
     outerSize := size 200 200 ]
   set f [ layout := widget b ]

-- End Main.hs

Thx, Huschi!