making org-agenda work betterer

This commit is contained in:
Chris Cochrun 2021-09-02 16:53:53 -05:00
parent b8b9559e38
commit 86f0bd0030
4 changed files with 33 additions and 11 deletions

View file

@ -634,6 +634,7 @@
(client.connect_signal
"manage"
(fn [c]
;; Set the windows at the slave,
;; i.e. put it at the end of others instead of setting it master.
(when (not awesome.startup) (awful.client.setslave c))
@ -643,21 +644,42 @@
(not c.size_hints.program_position))
;; Prevent clients from being unreachable after screen count changes.
(awful.placement.no_offscreen c))
;; MPV wasn't centering right
(when (= c.class "mpv") (awful.placement.centered c))
(awful.client.focus.byidx 1)
;; Rounded windows done right
(when (not c.fullscreen)
(set c.shape (fn [cr w h]
(gears.shape.rounded_rect cr w h (dpi 15)))))
(: c :activate [])))
(client.connect_signal "property::maximized"
(fn [c]
(let [s c.screen]
(set s.mywibox (wibox {;; since we are using a wibox we have a lot we need to set
;; as opposed to what we normally need to do with a wibar
:position "bottom"
:x 0
:y s.geometry.height
:height (dpi 33)
:width s.geometry.width
:ontop false
:stretch false
:type "dock"
:shape gears.shape.rectangle
:bg beautiful.bg_normal
:fg beautiful.fg_normal
:opacity 0.9})))))
;; make fullscreen clients no longer rounded windows
(client.connect_signal "property::fullscreen"
(fn [c]
(set c.shape (fn [cr w h]
(gears.shape.rectangle cr w h)))))
(client.connect_signal "manage"
(fn [c]
;; Rounded windows done right
(when (not c.fullscreen)
(set c.shape (fn [cr w h]
(gears.shape.rounded_rect cr w h (dpi 15)))))))
(client.connect_signal "focus" (fn [c] (set c.border_color beautiful.border_focus)))
(client.connect_signal "unfocus" (fn [c] (set c.border_color beautiful.border_normal)))
@ -673,5 +695,5 @@
(awful.spawn "bluetoothctl power on")
(awful.spawn "nextcloud --background")
(awful.spawn "rbw-agent")
(awful.spawn "jellyfin-mpv-shim")
;; (awful.spawn "jellyfin-mpv-shim")
(awful.spawn "xset r rate 220 90")