diff options
Diffstat (limited to '.config/emacs/modules')
-rw-r--r-- | .config/emacs/modules/bd--emms.el | 15 | ||||
-rw-r--r-- | .config/emacs/modules/bd--essential-windowing.el | 3 | ||||
-rw-r--r-- | .config/emacs/modules/bd--essentials.el | 3 | ||||
-rw-r--r-- | .config/emacs/modules/bd--exwm-windowing.el | 1 | ||||
-rw-r--r-- | .config/emacs/modules/bd--minibuffer.el | 1 | ||||
-rw-r--r-- | .config/emacs/modules/bd--popper.el | 38 | ||||
-rw-r--r-- | .config/emacs/modules/bd--shells.el | 6 |
7 files changed, 47 insertions, 20 deletions
diff --git a/.config/emacs/modules/bd--emms.el b/.config/emacs/modules/bd--emms.el index f7828ea..8ee2b34 100644 --- a/.config/emacs/modules/bd--emms.el +++ b/.config/emacs/modules/bd--emms.el @@ -1,14 +1,6 @@ ;; -*- lexical-binding: t; -*- -(require 'emms) -(add-to-list 'display-buffer-alist - `(,emms-playlist-buffer-name - (display-buffer-in-side-window) - (side . right) - (window-width . 45))) - - (defun emms-quickstart () "Queues a shuffled playlist and starts playback." @@ -19,6 +11,7 @@ playback." (emms-play-directory-tree (expand-file-name "~/Personal/mpd/music/")) (emms-shuffle)) + (use-package emms :bind (("C-z C-s" . 'emms-quickstart) ("C-z C-p" . 'emms-play-playlist)) @@ -47,5 +40,11 @@ playback." (emms-mode-line-icon-before-format (format "%s" (all-the-icons-fileicon "owl"))) (emms-mode-line-icon-enabled-p t)) +(add-to-list 'display-buffer-alist + `(,emms-playlist-buffer-name + (display-buffer-in-side-window) + (side . right) + (window-width . 45))) + (provide 'bd--emms) diff --git a/.config/emacs/modules/bd--essential-windowing.el b/.config/emacs/modules/bd--essential-windowing.el index c96bad0..9917a93 100644 --- a/.config/emacs/modules/bd--essential-windowing.el +++ b/.config/emacs/modules/bd--essential-windowing.el @@ -14,9 +14,6 @@ ;; no fringe (fringe-mode '(0 . 0)) -;; allow one side window per side of frame -(setopt window-sides-slots '(1 1 1 1)) - ;; alpha (defun bd/clamp (lower-bound upper-bound value) (max lower-bound (min value upper-bound))) diff --git a/.config/emacs/modules/bd--essentials.el b/.config/emacs/modules/bd--essentials.el index 2054bc3..1ea77de 100644 --- a/.config/emacs/modules/bd--essentials.el +++ b/.config/emacs/modules/bd--essentials.el @@ -33,9 +33,6 @@ ;;;; buffers (global-auto-revert-mode 1) (winner-mode 1) -;; do not show async command buffers by default -(add-to-list 'display-buffer-alist - (cons "\\*Async Shell Command\\*.*" (cons #'display-buffer-no-window nil))) (setopt scroll-up-aggressively '0.65 scroll-down-aggressively '0.65) diff --git a/.config/emacs/modules/bd--exwm-windowing.el b/.config/emacs/modules/bd--exwm-windowing.el index 8d95c1c..dc9d8c4 100644 --- a/.config/emacs/modules/bd--exwm-windowing.el +++ b/.config/emacs/modules/bd--exwm-windowing.el @@ -106,6 +106,7 @@ select a line from a file." ?\C-g ?\C-h ?\C-z + ?\C-` ?\M-x ?\M-` ?\M-& diff --git a/.config/emacs/modules/bd--minibuffer.el b/.config/emacs/modules/bd--minibuffer.el index ae108d5..9f1dc32 100644 --- a/.config/emacs/modules/bd--minibuffer.el +++ b/.config/emacs/modules/bd--minibuffer.el @@ -4,6 +4,7 @@ (setopt use-short-answers t vc-follow-symlinks t completion-ignore-case t + read-buffer-completion-ignore-case t ;; required for exwm (pass) but ;; always useful enable-recursive-minibuffers t) diff --git a/.config/emacs/modules/bd--popper.el b/.config/emacs/modules/bd--popper.el new file mode 100644 index 0000000..6b4d83b --- /dev/null +++ b/.config/emacs/modules/bd--popper.el @@ -0,0 +1,38 @@ +;; -*- lexical-binding: t; -*- + + +;;;; popper +(use-package popper + :bind (("C-`" . 'popper-toggle-latest) + ("M-`" . 'popper-cycle) + ("C-M-`" . popper-toggle-type)) + :config + (popper-mode) + (popper-echo-mode) + :custom + (popper-reference-buffers + '(("Output\\*$" . hide) + ("\\*Async Shell Command\\*.*" . hide) + "^\\*shell.*\\*$" shell-mode + "^\\*eshell.*\\*$" eshell-mode + "^\\*term.*\\*$" term-mode + messages-buffer-mode + help-mode + Info-mode + occur-mode + compilatin-mode + emms-playlist-mode + emms-browser-mode)) + ;; (popper-display-control 'user) + (popper-mode-line '(:eval (propertize " P" 'face 'mode-line-emphasis)))) + + +;;;; buffer defaults for default buffers +(add-to-list 'display-buffer-alist + `(,(regexp-opt'("*shell*" "*eshell*" "*term*")) + (display-buffer-in-side-window) + (side . top) + (window-height . 20))) + + +(provide 'bd--popper) diff --git a/.config/emacs/modules/bd--shells.el b/.config/emacs/modules/bd--shells.el index 4396ae1..67415e9 100644 --- a/.config/emacs/modules/bd--shells.el +++ b/.config/emacs/modules/bd--shells.el @@ -34,12 +34,6 @@ status, and path." ;;;; shell (require 'shell) -(add-to-list 'display-buffer-alist - `("\\*shell\\*" - (display-buffer-in-side-window) - (side . top) - (window-height . 20))) - (keymap-global-set "C-z C-e" (lambda () (interactive) (let ((curr-buffer (current-buffer)) |