summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorMatthias Schiffer <mschiffer@universe-factory.net>2011-07-14 00:09:20 +0200
committerMatthias Schiffer <mschiffer@universe-factory.net>2011-07-14 00:09:20 +0200
commit55d15b73caa4b8d74cf7d678842da69302e600d9 (patch)
treef24500cc8ffb6a1c1ad3bff774d741081069d082 /src
parent90c25a997bf951ea4b5c13cb95ef0dbb8105777e (diff)
downloadphi-55d15b73caa4b8d74cf7d678842da69302e600d9.tar
phi-55d15b73caa4b8d74cf7d678842da69302e600d9.zip
Restructured widget state
Diffstat (limited to 'src')
-rw-r--r--src/Phi.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Phi.hs b/src/Phi.hs
index a3d4762..73beba8 100644
--- a/src/Phi.hs
+++ b/src/Phi.hs
@@ -1,3 +1,4 @@
+import Phi.Types
import Phi.Panel
import Phi.Border
import Phi.X11
@@ -6,5 +7,5 @@ import Data.Monoid
main :: IO ()
main = do
- initPhi defaultXConfig defaultPanelConfig { panelPosition = Bottom, panelContent = border (simpleBorderWidth 1) 1 (simpleBorderWidth 2) (1, 1, 1, 0.5) (0.25, 0.25, 0.25, 0.5) 7 1 mempty }
- --initPhi defaultXConfig defaultPanelConfig { panelPosition = Bottom, panelContent = border (simpleBorderWidth 0) 0 (simpleBorderWidth 2) (1, 1, 1, 1) (0.75, 0.75, 0.75, 1) 0 1 mempty }
+ initPhi defaultXConfig defaultPanelConfig { panelPosition = Bottom}
+ [border (simpleBorderWidth 1) 1 (simpleBorderWidth 2) (1, 1, 1, 0.5) (0.25, 0.25, 0.25, 0.5) 7 1 []]