diff options
| -rw-r--r-- | accounts/gkleen@sif/xmobar/xmobar.hs | 2 | ||||
| -rw-r--r-- | accounts/gkleen@sif/xmonad/xmonad.hs | 5 |
2 files changed, 4 insertions, 3 deletions
diff --git a/accounts/gkleen@sif/xmobar/xmobar.hs b/accounts/gkleen@sif/xmobar/xmobar.hs index 74ce7347..6dbc56db 100644 --- a/accounts/gkleen@sif/xmobar/xmobar.hs +++ b/accounts/gkleen@sif/xmobar/xmobar.hs | |||
| @@ -33,7 +33,7 @@ main = xmobar config | |||
| 33 | , Run $ NamedXPropertyLog "_XMONAD_LAYOUT" "XMonadLayout" | 33 | , Run $ NamedXPropertyLog "_XMONAD_LAYOUT" "XMonadLayout" |
| 34 | , Run $ NamedXPropertyLog "_XMONAD_TITLE" "XMonadTitle" | 34 | , Run $ NamedXPropertyLog "_XMONAD_TITLE" "XMonadTitle" |
| 35 | , Run $ Date "%H:%M" "time" 50 | 35 | , Run $ Date "%H:%M" "time" 50 |
| 36 | , Run $ Date "%a %b %_d" "date" 50 | 36 | , Run $ Date "%a %_d %b %Y" "date" 50 |
| 37 | , Run $ Com "worktime" [] "worktime" 1500 | 37 | , Run $ Com "worktime" [] "worktime" 1500 |
| 38 | , Run $ Com "worktime" ["today"] "worktime-today" 1500 | 38 | , Run $ Com "worktime" ["today"] "worktime-today" 1500 |
| 39 | , Run $ Com "ssh" ["status.odin"] "status" 600 | 39 | , Run $ Com "ssh" ["status.odin"] "status" 600 |
diff --git a/accounts/gkleen@sif/xmonad/xmonad.hs b/accounts/gkleen@sif/xmonad/xmonad.hs index 4077169b..aba245ff 100644 --- a/accounts/gkleen@sif/xmonad/xmonad.hs +++ b/accounts/gkleen@sif/xmonad/xmonad.hs | |||
| @@ -229,10 +229,11 @@ hostFromName h | |||
| 229 | , (xK_w, ["sudo rewacom"]) | 229 | , (xK_w, ["sudo rewacom"]) |
| 230 | , (xK_y, [ "tmux new-window -dt media /var/media/link.hs $(xclip -o)" | 230 | , (xK_y, [ "tmux new-window -dt media /var/media/link.hs $(xclip -o)" |
| 231 | , "tmux new-window -dt media /var/media/download.hs $(xclip -o)" | 231 | , "tmux new-window -dt media /var/media/download.hs $(xclip -o)" |
| 232 | , "alacritty --class media -e tmuxp load /var/media" | 232 | , "tmux new-window -dt media /var/media/download.hs $(xclip -o -selection clipboard)" |
| 233 | ]) | 233 | ]) |
| 234 | , (xK_l, [ "tmux new-window -dt media mpv $(xclip -o)" | 234 | , (xK_l, [ "tmux new-window -dt media mpv $(xclip -o)" |
| 235 | , "tmux new-window -dt media streamlink --retry-open 10 $(xclip -o)" | 235 | , "tmux new-window -dt media mpv $(xclip -o -selection clipboard)" |
| 236 | , "alacritty --class media -e tmuxp load /var/media" | ||
| 236 | ]) | 237 | ]) |
| 237 | , (xK_m, [ "emacsclient -c -F \"'(title . \\\"Mail\\\")\" -e '(notmuch)'" | 238 | , (xK_m, [ "emacsclient -c -F \"'(title . \\\"Mail\\\")\" -e '(notmuch)'" |
| 238 | , "emacsclient -c -F \"'(title . \\\"Mail\\\")\" -e '(notmuch-mua-new-mail)'" | 239 | , "emacsclient -c -F \"'(title . \\\"Mail\\\")\" -e '(notmuch-mua-new-mail)'" |