summaryrefslogtreecommitdiff
path: root/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--emms.el
diff options
context:
space:
mode:
authorbdunahu <bdunahu@operationnull.com>2026-01-04 13:13:39 -0700
committerbdunahu <bdunahu@operationnull.com>2026-01-04 13:13:39 -0700
commitc2b706ff2f3aa42d58a03febad1d1b8f8d5a1142 (patch)
treed6786f531f02717472abdc992cc6c6ef81e660b3 /guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--emms.el
parentc4ca05231236c7e9bdf5304275eadde954acf588 (diff)
remove unnecessary nested guix dir
Diffstat (limited to 'guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--emms.el')
-rw-r--r--guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--emms.el68
1 files changed, 0 insertions, 68 deletions
diff --git a/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--emms.el b/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--emms.el
deleted file mode 100644
index f4e5064..0000000
--- a/guix/kolwynia/home/bdunahu/files/.config/emacs/modules/bd--emms.el
+++ /dev/null
@@ -1,68 +0,0 @@
-;;; -*- lexical-binding: t; -*-
-;;; Commentary:
-;;; Code:
-
-
-(use-package emms
- :bind (("C-z C-s" . #'emms-quickstart)
- ("C-z C-m" . #'switch-to-emms)
- :map emms-playlist-mode-map
- ("q" . #'quit-window))
- :config
- (emms-all)
-
- (defun emms-quickstart ()
- "Queues a shuffled playlist and starts
-playback."
- (interactive)
- (emms-stop)
- (when (bufferp emms-playlist-buffer-name)
- (kill-buffer emms-playlist-buffer-name))
- (emms-play-directory-tree (expand-file-name "~/ik/"))
- (emms-shuffle))
- (defun switch-to-emms ()
- (interactive)
-
- (if (get-buffer emms-playlist-buffer-name)
- (emms-playlist-mode-go)
- (message "The Ainur cannot hear you...")))
-
- (add-to-list 'emms-player-list 'emms-player-mpv)
- (emms-playing-time-disable-display)
- (setq-default emms-playlist-default-major-mode 'emms-playlist-mode
-
- emms-player-list '(emms-player-mpv)
- emms-player-mpv-environment '("PULSE_PROP_media.role=music")
- emms-player-mpv-parameters '("--quiet" "--really-quiet" "--no-audio-display" "--force-window=no" "--vo=null"))
- (setopt
- emms-track-description-function
- '(lambda (track)
- (let ((artist (emms-track-get track 'info-artist))
- (title (emms-track-get track 'info-title)))
- (cond
- ((and artist title)
- (concat artist " - " title))
- (title
- title)
- (t
- (emms-track-simple-description track))))))
- (setopt emms-source-file-default-directory (expand-file-name "~/ik/playlists/")
- 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
- emms-info-functions '(emms-info-native
- emms-info-exiftool))
- (add-to-list 'display-buffer-alist
- '((major-mode . emms-playlist-mode)
- (display-buffer-in-side-window)
- (side . left)
- (slot . 0)
- (width . 0.2)
- (post-command-select-window t))))
-
-
-(provide 'bd--emms)
-;;; bd--emms.el ends here