exwm -> dwm

1 files changed, 18 insertions, 0 deletions

diff --git a/.config/emacs/modules/bd--essential-windowing.el b/.config/emacs/modules/bd--essential-windowing.el
index 9917a93..14b7065 100644
--- a/.config/emacs/modules/bd--essential-windowing.el
+++ b/.config/emacs/modules/bd--essential-windowing.el
@@ -14,6 +14,24 @@
 ;; no fringe
 (fringe-mode '(0 . 0))
 
+(keymap-global-set "M-n" 'other-window)
+(keymap-global-set "M-p" (lambda ()
+                           (interactive)
+                           (other-window -1)))
+
+
+;; dedication
+(defun toggle-current-window-dedication ()
+  "Adds or revokes dedicated window status from a buffer. A
+dedicated buffer will never be automatically orphaned."
+  (interactive)
+  (let* ((window    (selected-window))
+         (dedicated (window-dedicated-p window)))
+    (set-window-dedicated-p window (not dedicated))
+    (message "Window %sdedicated to %s"
+             (if dedicated "no longer " "")
+             (buffer-name))))
+
 ;; alpha
 (defun bd/clamp (lower-bound upper-bound value)
   (max lower-bound (min value upper-bound)))