diff options
Diffstat (limited to 'accounts')
-rw-r--r-- | accounts/gkleen@sif/xmobar/xmobar.hs | 6 |
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 |