summaryrefslogtreecommitdiffstats
path: root/src/Phi.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Phi.hs')
-rw-r--r--src/Phi.hs13
1 files changed, 11 insertions, 2 deletions
diff --git a/src/Phi.hs b/src/Phi.hs
index a14ddab..30a63f8 100644
--- a/src/Phi.hs
+++ b/src/Phi.hs
@@ -12,9 +12,18 @@ main = do
runPhi defaultXConfig defaultPanelConfig { panelPosition = Bottom }
[theTaskbar, brightBorder [theClock]]
where
- theTaskbar = taskbar defaultTaskbarConfig { taskBorder = BorderConfig (BorderWidth 2 4 2 4) 1 (BorderWidth 0 5 0 5) (0.9, 0.9, 0.9, 0.65) (0.45, 0.45, 0.45, 0.8) 5 0
- , activeTaskBorder = BorderConfig (BorderWidth 2 4 2 4) 1 (BorderWidth 0 5 0 5) (1, 1, 1, 0.65) (0, 0, 0, 0.8) 5 0
+ normalTaskBorder = BorderConfig (BorderWidth 2 4 2 4) 1 (BorderWidth 0 5 0 5) (0.9, 0.9, 0.9, 0.65) (0.45, 0.45, 0.45, 0.8) 5 0
+ activeTaskBorder = normalTaskBorder {borderColor = (1, 1, 1, 0.65), backgroundColor = (0, 0, 0, 0.8)}
+ taskStyle = TaskStyle { taskFont = "Sans 7"
+ , taskColor = (1, 1, 1, 1)
+ , taskBorder = normalTaskBorder
+ , taskIconStyle = idIconStyle
+ }
+
+ theTaskbar = taskbar defaultTaskbarConfig { normalTaskStyle = taskStyle {taskIconStyle = desaturateIconStyle 0.7}
+ , activeTaskStyle = taskStyle {taskBorder = activeTaskBorder}
}
+
theClock = clock defaultClockConfig { clockFormat = "<span font='Sans 8'>%R</span>\n<span font='Sans 6'>%A %d %B</span>"
, lineSpacing = (-2)
, clockSize = 75