From e8bcf53e55b624d7f470d87065a5fcec2621593d Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 7 Feb 2022 17:09:20 -0600 Subject: Remove emms --- init.el | 40 ---------------------------------------- 1 file changed, 40 deletions(-) diff --git a/init.el b/init.el index ec011e6..a510daf 100644 --- a/init.el +++ b/init.el @@ -1236,46 +1236,6 @@ See also `crux-reopen-as-root-mode'." (:load-after consult embark) (add-hook 'embark-collect-mode-hook #'consult-preview-at-point-mode)) -(setup (:straight (emms - :type git - :flavor melpa - :files ("*.el" - "lisp/*.el" - "doc/emms.info" - "doc/emms.texinfo" - "emms-pkg.el") - :pre-build ("make" "-Cdoc") - :repo "https://git.savannah.gnu.org/git/emms.git")) - (:also-load +emms) - ;; TODO: Definitely need to do more customization here - (:option emms-source-file-default-directory "~/var/music/" - emms-player-mpv-update-metadata t) - (dolist (hook '(emms-browser-mode-hook - emms-lyrics-mode-hook - emms-playlist-mode-hook - emms-tag-editor-mode-hook)) - (add-hook hook #'turn-off-+key-mode) - (add-hook hook #'turn-off-user-save-mode)) - (require 'emms-setup) - (emms-all) - (emms-default-players) - ;; Streaming - (require 'emms-streams) - (:option emms-streams-file (sync/ "emacs/streams.emms")) - ;; Mode line - (:option emms-mode-line-icon-enabled-p t - emms-mode-line-format "%s" - emms-mode-line-mode-line-function ;#'emms-mode-line-icon-function - (defun +emms-mode-line-truncate () - (let ((current-trunc (concat "{" - (+string-truncate - (emms-mode-line-playlist-current) - 24) - "} "))) - current-trunc))) - (emms-mode-line-mode +1) - (emms-playing-time-mode -1)) - (setup (:straight epithet) (dolist (hook '(Info-selection-hook eww-after-render-hook -- cgit 1.4.1-21-gabe81