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.hs2
-rw-r--r--accounts/gkleen@sif/xmonad/xmonad.hs5
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)'"