1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
module Bottom (config) where
import Xmobar
import Config
import Monitors
-- ⛅
config cs tpl p = (baseConfig p) {
position = BottomSize C 100 defaultHeight
, textOffset = defaultHeight - 6
, textOffsets = [defaultHeight - 7, defaultHeight - 6, -1,
defaultHeight - 5, defaultHeight - 6, defaultHeight - 6]
, border = TopB
, template = "|tray| \
\<action=`toggle-nm-applet.sh `>|tun0||wlp2s0wi|</action> \
\ |dynnetwork| \
\ <action=`toggle-pasystray.sh `><fn=2>🎧</fn>|default:Master|\
\ |default:Capture|</action> <fn=6>🎵</fn>"
++ tpl
++ " {} |mbox| |EGPH| \
\ <fn=6>⏰ </fn>|uptime| <fn=6>🕓 </fn>|datetime| |laTime| "
, commands = [ Run (uptime p)
, Run (wireless p)
, Run (dynNetwork p)
, Run tun0
, Run (weather "EGPH") -- LEGE, LEBL, KCV0
, Run trayPadding
, Run mbox
, Run masterVol
, Run captureVol
, Run laTime
, Run localTime
] ++ cs
}
|
