Adding kmonad, and some keybinding changes

This commit is contained in:
Chris Cochrun 2021-05-12 07:33:58 -05:00
parent fbae04a8f1
commit 1d895277c9
6 changed files with 950 additions and 14 deletions

View file

@ -44,9 +44,9 @@
{:description "swap with client to the left" :group "client"})
(awful.key [ modkey shift ] "l" (fn [] (awful.client.swap.global_bydirection "right"))
{:description "swap with client to the right" :group "client"})
(awful.key [ modkey ctrl ] "j" (fn [] (awful.screen.focus_relative 1))
(awful.key [ modkey ] "l" (fn [] (awful.screen.focus_relative 1))
{:description "focus the next screen" :group "screen"})
(awful.key [ modkey ctrl ] "k" (fn [] (awful.screen.focus_relative -1))
(awful.key [ modkey ] "h" (fn [] (awful.screen.focus_relative -1))
{:description "focus the previous screen" :group "screen"})
(awful.key [ modkey ] "u" awful.client.urgent.jumpto
{:description "jump to urgent client" :group "client"})
@ -64,13 +64,13 @@
{:description "quit awesome" :group "awesome"})
;; layout
(awful.key [ modkey ] "l" (fn [] (awful.tag.incmwfact 0.05))
(awful.key [ modkey ctrl ] "l" (fn [] (awful.tag.incmwfact 0.05))
{:description "increase master width factor" :group "layout"})
(awful.key [ modkey ] "h" (fn [] (awful.tag.incmwfact -0.05))
(awful.key [ modkey ctrl ] "h" (fn [] (awful.tag.incmwfact -0.05))
{:description "decrease master width factor" :group "layout"})
(awful.key [ modkey ctrl ] "h" (fn [] (awful.tag.incnmaster 1 nil true))
(awful.key [ modkey ctrl ] "k" (fn [] (awful.tag.incnmaster 1 nil true))
{:description "increase the number of master clients" :group "layout"})
(awful.key [ modkey ctrl ] "l" (fn [] (awful.tag.incnmaster -1 nil true))
(awful.key [ modkey ctrl ] "j" (fn [] (awful.tag.incnmaster -1 nil true))
{:description "decrease the number of master clients" :group "layout"})
(awful.key [ modkey alt ] "l" (fn [] (when client.floating (client.relative_move 0 0 10 0)))
{:description "Increase width of floating window" :group "layout"})
@ -143,7 +143,7 @@
{:description "launch eshell in new emacs frame" :group "apps" })
(awful.key [ modkey ] "e" (fn [] (awful.spawn "emacsclient -c -a 'emacs'"))
{:description "launch new emacs frame" :group "apps" })
(awful.key [ modkey ] "p" (fn [] (awful.spawn "rofi-rbw"))
(awful.key [ modkey ] "p" (fn [] (awful.spawn "rofi-pass"))
{:description "select pass" :group "apps" })
(awful.key [ modkey shift ] "w" (fn [] (awful.spawn "libreoffice --writer"))
{:description "Open Writer" :group "apps" })