diff options
Diffstat (limited to '.config')
| -rw-r--r-- | .config/emacs/init.el | 1 | ||||
| -rw-r--r-- | .config/emacs/modules/bd--emms.el | 2 | ||||
| -rw-r--r-- | .config/emacs/modules/bd--exwm.el | 6 | ||||
| -rw-r--r-- | .config/emacs/modules/bd--irc.el | 1 | ||||
| -rw-r--r-- | .config/guix/modules/services/emacs.scm | 53 |
5 files changed, 60 insertions, 3 deletions
diff --git a/.config/emacs/init.el b/.config/emacs/init.el index 0dd79c5..6215b21 100644 --- a/.config/emacs/init.el +++ b/.config/emacs/init.el @@ -106,6 +106,7 @@ (require 'bd--devel) (require 'bd--org) (require 'bd--notes) +(require 'bd--emms) (require 'bd--modeline) (require 'bd--themes) (require 'bd--exwm) diff --git a/.config/emacs/modules/bd--emms.el b/.config/emacs/modules/bd--emms.el index 97b6dc3..1b8c45f 100644 --- a/.config/emacs/modules/bd--emms.el +++ b/.config/emacs/modules/bd--emms.el @@ -1,6 +1,5 @@ ;;; -*- lexical-binding: t; -*- ;;; Commentary: -;;; not loaded bd 1/24/25 ;;; Code: @@ -53,6 +52,7 @@ playback." emms-info-report-each-num-tracks 2000 emms-playlist-buffer-name "*Playlist*" emms-mode-line-icon-enabled-p nil + emms-mode-line-length-limit 35 emms-mode-line-format " [%s] " emms-repeat-playlist t) (add-to-list 'display-buffer-alist diff --git a/.config/emacs/modules/bd--exwm.el b/.config/emacs/modules/bd--exwm.el index 6fce268..1b48412 100644 --- a/.config/emacs/modules/bd--exwm.el +++ b/.config/emacs/modules/bd--exwm.el @@ -41,8 +41,10 @@ that buffer." ([f2] . bd/toggle-mute) ([f5] . bd/decrement-volume) ([f6] . bd/increment-volume) - ([f8] . bd/decrement-brightness) - ([f9] . bd/increment-brightness) + ([f7] . bd/decrement-brightness) + ([f8] . bd/increment-brightness) + ([f9] . emms-previous) + ([f10] . emms-next) ([print] . bd/shoot-part) ([S-print] . bd/shoot-full) ([?\s-O] . bd/browse-dispatcher) diff --git a/.config/emacs/modules/bd--irc.el b/.config/emacs/modules/bd--irc.el index 8c74096..99b1a49 100644 --- a/.config/emacs/modules/bd--irc.el +++ b/.config/emacs/modules/bd--irc.el @@ -16,6 +16,7 @@ rcirc-reconnect-delay 60 rcirc-omit-responses '("JOIN" "PART" "QUIT" "NICK" "AWAY") rcirc-track-minor-mode t + rcirc-track-ignore-server-buffer-flag t rcirc-server-alist '(("operationnull.com" :nick "Gondul" diff --git a/.config/guix/modules/services/emacs.scm b/.config/guix/modules/services/emacs.scm new file mode 100644 index 0000000..e975412 --- /dev/null +++ b/.config/guix/modules/services/emacs.scm @@ -0,0 +1,53 @@ +(define-module (services emacs) + #:use-module (gnu) + #:use-module (gnu home services) + #:use-module (gnu services) + #:use-module (gnu services configuration) + #:use-module (gnu system) + #:use-module (guix gexp) + #:export (bd-home-emacs-service-type)) + +;;; Commentary: +;;; Code: + +(use-package-modules + emacs + aspell + emacs-xyz + cpp + gnupg + mail + lisp) + +(define (bd-emacs-package-list config) + (list + emacs-next + pinentry-emacs + + emacs-anki-editor + emacs-emms + emacs-dash + emacs-denote + emacs-elpher + emacs-exwm + emacs-f + emacs-guix + emacs-paredit + emacs-pinentry + emacs-rainbow-delimiters + emacs-rainbow-mode + + aspell + aspell-dict-en + )) + + +(define bd-home-emacs-service-type + (service-type (name 'emacs-config) + (description "A service which bundles required +emacs packages.") + (extensions + (list (service-extension + home-profile-service-type + bd-emacs-package-list))) + (default-value #f))) |