chris/dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

some awesome changes mostly

Browse source
This commit is contained in:
Chris Cochrun 2021-09-01 06:04:57 -05:00
parent 8520db7ac6
commit 5e2448e1fb
7 changed files with 34 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

2
awesome/init.fnl
View file

@ -73,7 +73,7 @@
(if (= "syl\n" stdout)
(global laptop true)
(global laptop false))))
(local laptop true)
(local laptop false)
;; Table of layouts to cover with awful.layout.inc, order matters.
(set awful.layout.layouts [

23
awesome/keybindings.fnl
View file

@ -16,16 +16,16 @@
(local anim-y (awestore.tweened 1100 { :duration 200 :easing awestore.easing.cubic_in_out }))
(local anim-x (awestore.tweened 1920 { :duration 200 :easing awestore.easing.cubic_in_out }))
(local agenda-scratch (bling.module.scratchpad:new {
:command "emacsclient -e '(chris/org-agenda)'"
:rule [:name "*Org Agenda(a)*"]
:sticky true
:autoclose true
:floating true
:geometry {:height 900 :width 1200}
:reapply true
:dont_focus_before_close true
:awestore {:x anim-x :y anim-y}}))
(local agenda-scratch (bling.module.scratchpad {
:command "emacsclient -e '(chris/org-agenda-awesome)'"
:rule [:name "*Org Agenda(a)*"]
:sticky true
:autoclose true
:floating true
:geometry {:height 900 :width 1200}
:reapply true
:dont_focus_before_close true
:awestore {:x anim-x :y anim-y}}))
(fn get-volume [?callback]
(let [cb (or ?callback (fn [] nil))]
@ -150,8 +150,7 @@
(awful.key [ modkey ] "x" (fn [] (awful.spawn "emacsclient -c -e '(org-capture)'"
{:floating true :placement awful.placement.centered :class "org-agenda" :instance "org-agenda"}))
{:description "launch scratchpad in new emacs frame" :group "apps" })
(awful.key [ modkey ] "'" (fn [] (awful.spawn "emacsclient -e '(chris/org-agenda)'"
{:floating true :placement awful.placement.centered :class "org-agenda" :instance "org-agenda"}))
(awful.key [ modkey ] "'" (fn [] (awful.spawn "emacslient -e '(chris/org-agenda)'"))
{:description "launch org-agenda in new emacs frame" :group "apps" })
(awful.key [ modkey alt ] "m" (fn [] (awful.spawn "emacsclient -c -e '(org-roam-capture)'"))
{:description "launch org-roam-capture in new emacs frame" :group "apps" })

2
awesome/rules.fnl
View file

@ -174,11 +174,13 @@
"dolphin"
"feh"
"Arandr"
"gcr-prompter"
]
:name [
"Event Tester"
"remove images?"
"Blender Preferences"
"Unlock Login Keyring"
]
:role [
"pop-up"