diff options
Diffstat (limited to '.config/herbstluftwm/autostart')
-rwxr-xr-x | .config/herbstluftwm/autostart | 123 |
1 files changed, 123 insertions, 0 deletions
diff --git a/.config/herbstluftwm/autostart b/.config/herbstluftwm/autostart new file mode 100755 index 0000000..d93a60a --- /dev/null +++ b/.config/herbstluftwm/autostart @@ -0,0 +1,123 @@ +#!/usr/bin/guile +!# + +(define (hc command) + (system (string-append "herbstclient " command))) + +(define (keybind modkey key command) + (display (string-append "keybind " modkey "-" key " " command "\n")) + (hc (string-append "keybind " modkey "-" key " " command))) + +(define (mousebind modkey button command) + (hc (string-append "mousebind " modkey "-" button " " command))) + +(define (add-tag name) + (hc (string-append "add " name))) + +(define (set variable value) + (hc (string-append "set " variable " " value))) + +(define (unrule) + (hc "unrule -F")) + +(define (rule spec) + (hc (string-append "rule " spec))) + +(define modkey "Mod4") + +(define (create-tag name) + (add-tag name) + (keybind modkey name (string-append "use " name)) + (keybind modkey + (string-append "Shift-" name) + (string-append "move " name))) + +(define (dmenu-command fn nb nf) + (string-append "dmenu_run -fn '" fn "' -nb '" nb "' -nf '" nf "'")) + +(define (set-layout layout) + (display (string-append "set_layout " layout "\n")) + (hc (string-append "set_layout " layout))) + +;; colors +(set "frame_border_active_color" "\\#2e3436") +(set "frame_border_normal_color" "\\#0c191c") +(set "frame_bg_normal_color" "\\#2e3436") +(set "frame_bg_active_color" "\\#0c191c") +(set "frame_border_width" "0") +(set "window_border_width" "2") +(set "window_border_normal_color" "\\#0c191c") +(set "window_border_active_color" "\\#800000") + +;; other settings +(set "default_frame_layout" "2") +(set-layout "max") + +;; keybindings +(keybind modkey "Mod1-q" "quit") +(keybind modkey "Mod1-r" "reload") +(keybind modkey "Shift-Mod1-c" "close") +(keybind modkey "Return" "spawn urxvt") +(keybind modkey "r" + (string-append + "spawn " + (dmenu-command + "-misc-tamsyn-medium-r-normal-*-14-*-*-*-*-*-iso8859-*" + "#252a2b" "#eeeeec"))) +(keybind "Control" "Mod1-l" "spawn i3lock -c 000000") +(keybind modkey "t" "spawn ~/bin/hlwm/capture-todo") +(keybind modkey "Shift-t" "spawn ~/bin/hlwm/show-todo") + +;; tags +(hc "rename default q") +(for-each create-tag '("q" "w" "e" "a" "s" "d" "z" "x" "c")) + +;; layout +(hc "remove_monitor 1") +(hc "move_monitor 0 1680x1050+0+0") +(hc "add_monitor 1280x1024+1680+0 w") + +;; layouting +(keybind modkey "Shift-r" "remove") +(keybind modkey "space" "cycle_layout 1") +(keybind modkey "u" "split vertical 0.5") +(keybind modkey "o" "split horizontal 0.5") +(keybind modkey "f" "floating toggle") +(keybind modkey "Shift-f" "fullscreen toggle") +(keybind modkey "p" "pseudotile toggle") + +;; resizing +(define resizestep "0.05") +(keybind modkey "Control-h" (string-append "resize left +" resizestep)) +(keybind modkey "Control-j" (string-append "resize down +" resizestep)) +(keybind modkey "Control-k" (string-append "resize up +" resizestep)) +(keybind modkey "Control-l" (string-append "resize right +" resizestep)) + +;; mouse +(mousebind modkey "Button1" "move") +(mousebind modkey "Button2" "resize") +(mousebind modkey "Button3" "zoom") + +;; focus +(keybind modkey "BackSpace" "cycle_monitor") +(keybind modkey "Tab" "cycle_all +1") +(keybind modkey "Shift-Tab" "cycle_all -1") +(keybind modkey "Mod1-c" "cycle") +(keybind modkey "h" "focus left") +(keybind modkey "j" "focus down") +(keybind modkey "k" "focus up") +(keybind modkey "l" "focus right") +(keybind modkey "Shift-h" "shift left") +(keybind modkey "Shift-j" "shift down") +(keybind modkey "Shift-k" "shift up") +(keybind modkey "Shift-l" "shift right") + +;; rules +(unrule) +(rule "focus=on") ; normally do not focus new clients +(rule "windowtype=_NET_WM_WINDOW_TYPE_DIALOG focus=on pseudotile=on") +(rule "class=Xephyr pseudotile=on") + +;; Show panel + +(system "~/.config/herbstluftwm/panel.sh &") |