neocturne/phi
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Some minor adjustments

Browse source
This commit is contained in:
Matthias Schiffer 2011-07-19 12:49:05 +02:00
parent 387613b2f0
commit bc9f8e1fbc
2 changed files with 5 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Phi.hs
View file

@ -12,7 +12,7 @@ import Phi.Widgets.Systray
main :: IO ()
main = do
runPhi defaultXConfig defaultPanelConfig { panelPosition = Bottom }
runPhi defaultXConfig defaultPanelConfig { panelPosition = Top }
[alphaBox 0.9 [theTaskbar, brightBorder [theSystray], brightBorder [theClock]]]
where
normalTaskBorder = BorderConfig (BorderWidth (-1) (-3) (-1) 7) 1 (BorderWidth 0 5 0 5) (0.9, 0.9, 0.9, 0.8) (0.45, 0.45, 0.45, 0.8) 5 0