Simplify struts generation

This commit is contained in:
Matthias Schiffer 2011-07-12 14:41:25 +02:00
parent c918dde366
commit 6de4eb5792
3 changed files with 26 additions and 36 deletions

View file

@ -3,4 +3,4 @@ import Phi.X11
main :: IO ()
main = do
initPhi phiDefaultXConfig { phiPanelPosition = PanelPositionBottom }
initPhi phiDefaultXConfig { phiPanelPosition = Bottom }