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

Merge branch 'master' of gitlab.com:chriscochrun/dotfiles

Browse source
This commit is contained in:
Chris Cochrun 2021-09-02 16:54:30 -05:00
commit f3217ceb09
12 changed files with 61 additions and 3046 deletions
Download patch file Download diff file Expand all files Collapse all files

5
awesome/README.org Normal file
View file

@ -0,0 +1,5 @@
#+TITLE:AwesomeWM in Fennel
#+AUTHOR: Chris Cochrun
#+DESCRIPTION: This Awesome Window Manager config is written primarily in fennel. This is a lisp written in and compiled to lua. Fennel runs at lua speeds but is created to make a lisp syntax for lua and to provide a lisp macro system for lua. I prefer reading and writing lisps over lua so that is why my AwesomeWM is configured in fennel.
To get us started we need to bootstrap fennel in order to get Awesome to load .fnl files.

3011
awesome/fennel.lua
View file

File diff suppressed because it is too large Load diff

13
awesome/init.fnl
View file

@ -1,4 +1,3 @@
;; -*- comment-end: ""; -*-
;; Standard awesome library|#
(local gears (require "gears"))
(local awful (require "awful"))
@ -49,7 +48,7 @@
;; Import the bling modules and layouts
(local bling (require "bling"))
(local awestore (require "awestore"))
;; (local awestore (require "awestore"))
;; This is used later as the default terminal and editor to run.
(var terminal "alacritty")
@ -371,9 +370,6 @@
1 s.batteryicon
2 s.batterytext
3 s.batteryspace
4 s.batteryicon
5 s.batterytext2
6 s.batteryspace
:layout wibox.layout.fixed.horizontal})
:widget wibox.container.margin
:left (dpi 5)}
@ -504,7 +500,9 @@
7 (if (= s.index 1) s.mysystray)
8 s.mylayoutbox
}
:widget wibox.container.background
:widget wibox.container.margin
:top (dpi 1)
:bottom (dpi 1)
})
(local yoffset (dpi 45)) ;; variables to be used for placing the wibox
@ -646,8 +644,7 @@
(awful.placement.no_offscreen c))
;; MPV wasn't centering right
(when (= c.class "mpv") (awful.placement.centered c))
;; (when (= c.class "mpv") (awful.placement.centered c))
(awful.client.focus.byidx 1)
;; Rounded windows done right

49
awesome/keybindings.fnl
View file

@ -4,7 +4,7 @@
(local hotkeys_popup (require "awful.hotkeys_popup"))
(local bling (require "bling"))
(local awestore (require "awestore"))
;; (local awestore (require "awestore"))
(local terminal "alacritty")
(local modkey "Mod4")
@ -13,19 +13,20 @@
(local alt "Mod1")
;; adding an org-agenda scratchpad
(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 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 {
: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}}))
(local agenda-scratch (bling.module.scratchpad:new {
:command "emacsclient -e '(chris/org-agenda)'"
:rule [:name "org-agenda"]
: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))]
@ -33,8 +34,8 @@
(awful.spawn.easy_async "cat /etc/hostname" (fn [ stdout stderr reason exit_code ]
(if (= "syl\n" stdout)
(global bwmenu "bwmenu -- -config /home/chris/.dotfiles/rofi/launchers-git/laptop.rasi")
(global bwmenu "bwmenu -- -config /home/chris/.dotfiles/rofi/launchers-git/desktop.rasi"))))
(global bwmenu "bwmenu -- -config /home/chris/.config/rofi/launchers-git/laptop.rasi")
(global bwmenu "bwmenu -- -config /home/chris/.config/rofi/launchers-git/desktop.rasi"))))
(local keybindings
{
@ -65,8 +66,8 @@
{:description "focus the next screen" :group "screen"})
(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"})
;; (awful.key [ modkey ] "u" awful.client.urgent.jumpto
;; {:description "jump to urgent client" :group "client"})
(awful.key [ modkey ] "Tab" (fn []
(awful.client.focus.history.previous)
(when client.focus (: client.focus :raise)))
@ -112,7 +113,7 @@
{:description "restore minimized" :group "client"})
;; Prompt
(awful.key [ modkey ] "Menu" (fn [] (awful.spawn "/home/chris/.dotfiles/rofi/launchers-git/run.sh"))
(awful.key [ modkey ] "Menu" (fn [] (awful.spawn "/home/chris/.config/rofi/launchers-git/run.sh"))
{:description "run prompt" :group "launcher"})
(awful.key [ modkey shift ctrl ] "x" (fn []
@ -130,7 +131,7 @@
{:description "screenshot" :group "utilities"})
(awful.key [modkey shift] "p" (fn [] (awful.spawn "flameshot gui"))
{:description "screenshot" :group "utilities"})
(awful.key [ modkey ] "." (fn [] (awful.spawn "/home/chris/.dotfiles/rofi/launchers-git/emoji.sh"))
(awful.key [ modkey ] "." (fn [] (awful.spawn "/home/chris/.config/rofi/launchers-git/emoji.sh"))
{:description "emoji picker" :group "utilities"})
(awful.key [] "XF86MonBrightnessUp" (fn [] (awful.spawn
"light -A 5"))
@ -150,7 +151,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 "emacslient -e '(chris/org-agenda)'"))
(awful.key [ modkey ] "'" (fn [] (awful.spawn "agenda-scratch"))
{: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" })
@ -169,9 +170,11 @@
(awful.key [modkey] "b" (fn [] (awful.spawn "nyxt"))
{:description "launch browser" :group "apps"})
;; rofi
(awful.key [] "Menu" (fn [] (awful.spawn "/home/chris/.dotfiles/rofi/launchers-git/launcher.sh"))
(awful.key [] "Menu" (fn [] (awful.spawn "/home/chris/.config/rofi/launchers-git/launcher.sh"))
{:description "launch rofi" :group "launcher"})
(awful.key [modkey] "w" (fn [] (awful.spawn "/home/chris/.dotfiles/rofi/launchers-git/windows.sh"))
(awful.key [modkey alt] "space" (fn [] (awful.spawn "/home/chris/.config/rofi/launchers-git/launcher.sh"))
{:description "launch rofi" :group "launcher"})
(awful.key [modkey] "w" (fn [] (awful.spawn "/home/chris/.config/rofi/launchers-git/windows.sh"))
{:description "launch rofi window switcher" :group "launcher"})
(awful.key [modkey shift] "b" (fn [] (awful.spawn bwmenu))
{:description "launch rofi bitwarden selector" :group "launcher"})
@ -377,6 +380,8 @@
{:description "move to screen" :group "client"})
(awful.key [ modkey ] "t" (fn [c] (set c.ontop (not c.ontop)))
{:description "toggle keep on top" :group "client"})
(awful.key [ modkey ] "u" (fn [c] (set c.sticky (not c.sticky)))
{:description "toggle keep on top" :group "client"})
(awful.key [ modkey ] "n" (fn [c]
;; The client currently has the input focus, so it cannot be
;; minimized, since minimized clients can't have the focus.

2
awesome/rules.fnl
View file

@ -116,6 +116,7 @@
:properties {
:floating true
:raise true
:sticky true
:placement (+ awful.placement.no_offscreen awful.placement.centered)
}
}
@ -175,6 +176,7 @@
"feh"
"Arandr"
"gcr-prompter"
"ffplay"
]
:name [
"Event Tester"