summaryrefslogtreecommitdiff
path: root/accounts/gkleen@sif
diff options
context:
space:
mode:
Diffstat (limited to 'accounts/gkleen@sif')
-rw-r--r--accounts/gkleen@sif/xmobar/xmobar.hs6
1 files changed, 5 insertions, 1 deletions
diff --git a/accounts/gkleen@sif/xmobar/xmobar.hs b/accounts/gkleen@sif/xmobar/xmobar.hs
index e6e34e67..322b4449 100644
--- a/accounts/gkleen@sif/xmobar/xmobar.hs
+++ b/accounts/gkleen@sif/xmobar/xmobar.hs
@@ -25,13 +25,17 @@ main = xmobar config
25 , "%worktime%" 25 , "%worktime%"
26 , "%worktime-today%" 26 , "%worktime-today%"
27 , "%date%" 27 , "%date%"
28 , "%weekdate%"
29 , "%time%"
28 ] 30 ]
29 in left <> "}{" <> right 31 in left <> "}{" <> right
30 , commands = 32 , commands =
31 [ Run $ NamedXPropertyLog "_XMONAD_WORKSPACES" "XMonadWorkspaces" 33 [ Run $ NamedXPropertyLog "_XMONAD_WORKSPACES" "XMonadWorkspaces"
32 , Run $ NamedXPropertyLog "_XMONAD_LAYOUT" "XMonadLayout" 34 , Run $ NamedXPropertyLog "_XMONAD_LAYOUT" "XMonadLayout"
33 , Run $ NamedXPropertyLog "_XMONAD_TITLE" "XMonadTitle" 35 , Run $ NamedXPropertyLog "_XMONAD_TITLE" "XMonadTitle"
34 , Run $ Date "%Y-%m-%d W%V-%u %H:%M:%S%Ez" "date" 2 36 , Run $ Date "%Y-%m-%d" "date" 500
37 , Run $ Date "W%V-%u" "weekdate" 500
38 , Run $ Date "%H:%M:%S%Ez" "time" 2
35 , Run $ Com "worktime" [] "worktime" 1500 39 , Run $ Com "worktime" [] "worktime" 1500
36 , Run $ Com "worktime" ["today"] "worktime-today" 1500 40 , Run $ Com "worktime" ["today"] "worktime-today" 1500
37 , Run $ Com "ssh" ["status.odin"] "status" 600 41 , Run $ Com "ssh" ["status.odin"] "status" 600