music
This commit is contained in:
Chris Cochrun
parent
29a8b1553e
commit
1ef1dbed58
70
README.org
70
README.org
|
|
@ -37,6 +37,7 @@
|
||||||
- [[#eaf-emacs-application-framework][EAF (Emacs Application Framework)]]
|
- [[#eaf-emacs-application-framework][EAF (Emacs Application Framework)]]
|
||||||
- [[#elfeed][Elfeed]]
|
- [[#elfeed][Elfeed]]
|
||||||
- [[#bongo][Bongo]]
|
- [[#bongo][Bongo]]
|
||||||
|
- [[#emms][EMMS]]
|
||||||
- [[#transmission][Transmission]]
|
- [[#transmission][Transmission]]
|
||||||
- [[#pass][Pass]]
|
- [[#pass][Pass]]
|
||||||
- [[#matrixement][Matrix/Ement]]
|
- [[#matrixement][Matrix/Ement]]
|
||||||
|
|
@ -396,6 +397,7 @@ This evil-collection package includes a lot of other evil based things.
|
||||||
"of" '(:ignore t :which-key "elfeed")
|
"of" '(:ignore t :which-key "elfeed")
|
||||||
"h" '(:ignore t :which-key "help")
|
"h" '(:ignore t :which-key "help")
|
||||||
"n" '(:ignore t :which-key "notes")
|
"n" '(:ignore t :which-key "notes")
|
||||||
|
"m" '(:ignore t :which-key "music")
|
||||||
"l" '(:ignore t :which-key "lsp")
|
"l" '(:ignore t :which-key "lsp")
|
||||||
"sp" '(:ignore t :which-key "passwords")
|
"sp" '(:ignore t :which-key "passwords")
|
||||||
"bs" '(consult-buffer :which-key "buffer search")
|
"bs" '(consult-buffer :which-key "buffer search")
|
||||||
|
|
@ -2575,13 +2577,19 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
(use-package bongo
|
(use-package bongo
|
||||||
:commands (bongo bongo-playlist-buffer)
|
:commands (bongo bongo-playlist-buffer)
|
||||||
:config
|
:config
|
||||||
|
(setq bongo-default-directory "~/Music"
|
||||||
|
bongo-prefer-library-buffers nil
|
||||||
|
bongo-insert-whole-directory-trees t
|
||||||
|
bongo-logo nil
|
||||||
|
bongo-display-playback-mode-indicator t
|
||||||
|
bongo-display-inline-playback-progress t
|
||||||
|
bongo-field-separator (propertize " · " 'face 'shadow))
|
||||||
|
|
||||||
(define-bongo-backend mpv
|
(define-bongo-backend mpv
|
||||||
:constructor 'bongo-start-mpv-player
|
:constructor 'bongo-start-mpv-player
|
||||||
:program-name 'mpv
|
:program-name 'mpv
|
||||||
:extra-program-arguments '("--profile=fast --input-ipc-server=/tmp/mpvsocket")
|
:extra-program-arguments '("--profile=fast --input-ipc-server=/tmp/mpvsocket")
|
||||||
:matcher '((local-file "file:" "http:" "ftp:" "lbry:")
|
:matcher '((local-file "file:" "http:" "ftp:" "lbry:")
|
||||||
"mka" "wav" "wma" "ogm" "opus"
|
|
||||||
"ogg" "flac" "mp3" "mka" "wav"
|
|
||||||
"mpg" "mpeg" "vob" "avi" "ogm" "mp4"
|
"mpg" "mpeg" "vob" "avi" "ogm" "mp4"
|
||||||
"mkv" "mov" "asf" "wmv" "rm" "rmvb" "ts")
|
"mkv" "mov" "asf" "wmv" "rm" "rmvb" "ts")
|
||||||
:matcher '(("mms:" "mmst:" "rtp:" "rtsp:" "udp:" "unsv:"
|
:matcher '(("mms:" "mmst:" "rtp:" "rtsp:" "udp:" "unsv:"
|
||||||
|
|
@ -2589,8 +2597,23 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
"cue:" "sdp:" "mpst:" "tivo:") . t)
|
"cue:" "sdp:" "mpst:" "tivo:") . t)
|
||||||
:matcher '(("http:" "https:" "lbry:") . t))
|
:matcher '(("http:" "https:" "lbry:") . t))
|
||||||
|
|
||||||
(setq bongo-enabled-backends '(mpv)
|
(define-bongo-backend mpv-music
|
||||||
bongo-mpv-extra-arguments '("--profile=fast")
|
:constructor 'bongo-start-mpv-player
|
||||||
|
:program-name-variable 'mpv
|
||||||
|
:extra-program-arguments '("--profile=slow --input-ipc-server=/tmp/mpvsocket")
|
||||||
|
:matcher '((local-file "file:" "http:" "ftp:" "lbry:")
|
||||||
|
"mka" "wav" "wma" "ogm" "opus"
|
||||||
|
"ogg" "flac" "mp3" "mka" "wav")
|
||||||
|
:matcher '(("http:" "https:" "lbry:") . t))
|
||||||
|
|
||||||
|
(setq bongo-custom-backend-matchers '((mpv-music local-file
|
||||||
|
"mka" "wav" "wma" "ogm" "opus"
|
||||||
|
"ogg" "flac" "mp3" "mka" "wav")
|
||||||
|
(mpv local-file
|
||||||
|
"mpg" "mpeg" "vob" "avi" "ogm" "mp4"
|
||||||
|
"mkv" "mov" "asf" "wmv" "rm" "rmvb" "ts")))
|
||||||
|
|
||||||
|
(setq bongo-enabled-backends '(mpv mpv-music)
|
||||||
bongo-track-mark-icon-file-name "track-mark-icon.png")
|
bongo-track-mark-icon-file-name "track-mark-icon.png")
|
||||||
|
|
||||||
(defun chris/bongo-mark-line-forward ()
|
(defun chris/bongo-mark-line-forward ()
|
||||||
|
|
@ -2613,9 +2636,10 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
|
|
||||||
:general
|
:general
|
||||||
(chris/leader-keys
|
(chris/leader-keys
|
||||||
:states 'normal
|
|
||||||
"ob" 'bongo
|
"ob" 'bongo
|
||||||
"oB" 'chris/bongo-open-elfeed-queue-buffer)
|
"oB" 'chris/bongo-open-elfeed-queue-buffer
|
||||||
|
"mi" 'bongo-insert-enqueue
|
||||||
|
"mp" 'bongo-pause/resume)
|
||||||
(general-def 'normal bongo-playlist-mode-map
|
(general-def 'normal bongo-playlist-mode-map
|
||||||
"RET" 'bongo-dwim
|
"RET" 'bongo-dwim
|
||||||
"d" 'bongo-kill-line
|
"d" 'bongo-kill-line
|
||||||
|
|
@ -2636,6 +2660,40 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
"q" 'bury-buffer))
|
"q" 'bury-buffer))
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
|
** EMMS
|
||||||
|
Since Bongo seems kinda difficult I shall give EMMS another try.
|
||||||
|
#+begin_src emacs-lisp
|
||||||
|
(use-package emms
|
||||||
|
:config
|
||||||
|
(emms-all)
|
||||||
|
(evil-collection-emms-setup)
|
||||||
|
(emms-default-players)
|
||||||
|
(setq emms-source-file-default-directory "~/Music/")
|
||||||
|
|
||||||
|
(defun chris/emms-delete-song ()
|
||||||
|
"Deletes files in the emms browser by default. Maybe I'll have a yes or no thingy..."
|
||||||
|
(interactive)
|
||||||
|
(if (yes-or-no-p "delete the file too?")
|
||||||
|
(emms-browser-remove-tracks t)
|
||||||
|
(emms-browser-remove-tracks)))
|
||||||
|
|
||||||
|
:general
|
||||||
|
(chris/leader-keys
|
||||||
|
:states 'normal
|
||||||
|
:keymaps 'override
|
||||||
|
"mo" 'emms
|
||||||
|
"mb" 'emms-browser
|
||||||
|
"mp" 'emms-pause)
|
||||||
|
(general-def 'normal emms-playlist-mode-map
|
||||||
|
"q" 'bury-buffer
|
||||||
|
"d" 'emms-playlist-mode-kill-track
|
||||||
|
"D" 'emms-playlist-mode-goto-dired-at-point)
|
||||||
|
(general-def 'normal emms-browser-mode-map
|
||||||
|
"q" 'bury-buffer
|
||||||
|
"d" 'chris/emms-delete-song
|
||||||
|
"D" 'emms-browser-view-in-dired))
|
||||||
|
#+end_src
|
||||||
|
|
||||||
** Transmission
|
** Transmission
|
||||||
I use transmission on a server to manage my torrents
|
I use transmission on a server to manage my torrents
|
||||||
#+begin_src emacs-lisp
|
#+begin_src emacs-lisp
|
||||||
|
|
|
||||||
68
init.el
68
init.el
|
|
@ -229,6 +229,7 @@
|
||||||
"of" '(:ignore t :which-key "elfeed")
|
"of" '(:ignore t :which-key "elfeed")
|
||||||
"h" '(:ignore t :which-key "help")
|
"h" '(:ignore t :which-key "help")
|
||||||
"n" '(:ignore t :which-key "notes")
|
"n" '(:ignore t :which-key "notes")
|
||||||
|
"m" '(:ignore t :which-key "music")
|
||||||
"l" '(:ignore t :which-key "lsp")
|
"l" '(:ignore t :which-key "lsp")
|
||||||
"sp" '(:ignore t :which-key "passwords")
|
"sp" '(:ignore t :which-key "passwords")
|
||||||
"bs" '(consult-buffer :which-key "buffer search")
|
"bs" '(consult-buffer :which-key "buffer search")
|
||||||
|
|
@ -1874,13 +1875,19 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
(use-package bongo
|
(use-package bongo
|
||||||
:commands (bongo bongo-playlist-buffer)
|
:commands (bongo bongo-playlist-buffer)
|
||||||
:config
|
:config
|
||||||
|
(setq bongo-default-directory "~/Music"
|
||||||
|
bongo-prefer-library-buffers nil
|
||||||
|
bongo-insert-whole-directory-trees t
|
||||||
|
bongo-logo nil
|
||||||
|
bongo-display-playback-mode-indicator t
|
||||||
|
bongo-display-inline-playback-progress t
|
||||||
|
bongo-field-separator (propertize " · " 'face 'shadow))
|
||||||
|
|
||||||
(define-bongo-backend mpv
|
(define-bongo-backend mpv
|
||||||
:constructor 'bongo-start-mpv-player
|
:constructor 'bongo-start-mpv-player
|
||||||
:program-name 'mpv
|
:program-name 'mpv
|
||||||
:extra-program-arguments '("--profile=fast --input-ipc-server=/tmp/mpvsocket")
|
:extra-program-arguments '("--profile=fast --input-ipc-server=/tmp/mpvsocket")
|
||||||
:matcher '((local-file "file:" "http:" "ftp:" "lbry:")
|
:matcher '((local-file "file:" "http:" "ftp:" "lbry:")
|
||||||
"mka" "wav" "wma" "ogm" "opus"
|
|
||||||
"ogg" "flac" "mp3" "mka" "wav"
|
|
||||||
"mpg" "mpeg" "vob" "avi" "ogm" "mp4"
|
"mpg" "mpeg" "vob" "avi" "ogm" "mp4"
|
||||||
"mkv" "mov" "asf" "wmv" "rm" "rmvb" "ts")
|
"mkv" "mov" "asf" "wmv" "rm" "rmvb" "ts")
|
||||||
:matcher '(("mms:" "mmst:" "rtp:" "rtsp:" "udp:" "unsv:"
|
:matcher '(("mms:" "mmst:" "rtp:" "rtsp:" "udp:" "unsv:"
|
||||||
|
|
@ -1888,8 +1895,23 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
"cue:" "sdp:" "mpst:" "tivo:") . t)
|
"cue:" "sdp:" "mpst:" "tivo:") . t)
|
||||||
:matcher '(("http:" "https:" "lbry:") . t))
|
:matcher '(("http:" "https:" "lbry:") . t))
|
||||||
|
|
||||||
(setq bongo-enabled-backends '(mpv)
|
(define-bongo-backend mpv-music
|
||||||
bongo-mpv-extra-arguments '("--profile=fast")
|
:constructor 'bongo-start-mpv-player
|
||||||
|
:program-name-variable 'mpv
|
||||||
|
:extra-program-arguments '("--profile=slow --input-ipc-server=/tmp/mpvsocket")
|
||||||
|
:matcher '((local-file "file:" "http:" "ftp:" "lbry:")
|
||||||
|
"mka" "wav" "wma" "ogm" "opus"
|
||||||
|
"ogg" "flac" "mp3" "mka" "wav")
|
||||||
|
:matcher '(("http:" "https:" "lbry:") . t))
|
||||||
|
|
||||||
|
(setq bongo-custom-backend-matchers '((mpv-music local-file
|
||||||
|
"mka" "wav" "wma" "ogm" "opus"
|
||||||
|
"ogg" "flac" "mp3" "mka" "wav")
|
||||||
|
(mpv local-file
|
||||||
|
"mpg" "mpeg" "vob" "avi" "ogm" "mp4"
|
||||||
|
"mkv" "mov" "asf" "wmv" "rm" "rmvb" "ts")))
|
||||||
|
|
||||||
|
(setq bongo-enabled-backends '(mpv mpv-music)
|
||||||
bongo-track-mark-icon-file-name "track-mark-icon.png")
|
bongo-track-mark-icon-file-name "track-mark-icon.png")
|
||||||
|
|
||||||
(defun chris/bongo-mark-line-forward ()
|
(defun chris/bongo-mark-line-forward ()
|
||||||
|
|
@ -1912,9 +1934,10 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
|
|
||||||
:general
|
:general
|
||||||
(chris/leader-keys
|
(chris/leader-keys
|
||||||
:states 'normal
|
|
||||||
"ob" 'bongo
|
"ob" 'bongo
|
||||||
"oB" 'chris/bongo-open-elfeed-queue-buffer)
|
"oB" 'chris/bongo-open-elfeed-queue-buffer
|
||||||
|
"mi" 'bongo-insert-enqueue
|
||||||
|
"mp" 'bongo-pause/resume)
|
||||||
(general-def 'normal bongo-playlist-mode-map
|
(general-def 'normal bongo-playlist-mode-map
|
||||||
"RET" 'bongo-dwim
|
"RET" 'bongo-dwim
|
||||||
"d" 'bongo-kill-line
|
"d" 'bongo-kill-line
|
||||||
|
|
@ -1934,6 +1957,36 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
"H" 'bongo-switch-buffers
|
"H" 'bongo-switch-buffers
|
||||||
"q" 'bury-buffer))
|
"q" 'bury-buffer))
|
||||||
|
|
||||||
|
(use-package emms
|
||||||
|
:config
|
||||||
|
(emms-all)
|
||||||
|
(evil-collection-emms-setup)
|
||||||
|
(emms-default-players)
|
||||||
|
(setq emms-source-file-default-directory "~/Music/")
|
||||||
|
|
||||||
|
(defun chris/emms-delete-song ()
|
||||||
|
"Deletes files in the emms browser by default. Maybe I'll have a yes or no thingy..."
|
||||||
|
(interactive)
|
||||||
|
(if (yes-or-no-p "delete the file too?")
|
||||||
|
(emms-browser-remove-tracks t)
|
||||||
|
(emms-browser-remove-tracks)))
|
||||||
|
|
||||||
|
:general
|
||||||
|
(chris/leader-keys
|
||||||
|
:states 'normal
|
||||||
|
:keymaps 'override
|
||||||
|
"mo" 'emms
|
||||||
|
"mb" 'emms-browser
|
||||||
|
"mp" 'emms-pause)
|
||||||
|
(general-def 'normal emms-playlist-mode-map
|
||||||
|
"q" 'bury-buffer
|
||||||
|
"d" 'emms-playlist-mode-kill-track
|
||||||
|
"D" 'emms-playlist-mode-goto-dired-at-point)
|
||||||
|
(general-def 'normal emms-browser-mode-map
|
||||||
|
"q" 'bury-buffer
|
||||||
|
"d" 'chris/emms-delete-song
|
||||||
|
"D" 'emms-browser-view-in-dired))
|
||||||
|
|
||||||
(use-package transmission
|
(use-package transmission
|
||||||
:commands (transmission)
|
:commands (transmission)
|
||||||
:config
|
:config
|
||||||
|
|
@ -2034,8 +2087,6 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
gcmh-verbose nil))
|
gcmh-verbose nil))
|
||||||
|
|
||||||
(setq warning-suppress-types '((comp)))
|
(setq warning-suppress-types '((comp)))
|
||||||
<<<<<<< HEAD
|
|
||||||
=======
|
|
||||||
(custom-set-variables
|
(custom-set-variables
|
||||||
;; custom-set-variables was added by Custom.
|
;; custom-set-variables was added by Custom.
|
||||||
;; If you edit it by hand, you could mess it up, so be careful.
|
;; If you edit it by hand, you could mess it up, so be careful.
|
||||||
|
|
@ -2053,4 +2104,3 @@ interfere with the default `bongo-playlist-buffer'."
|
||||||
;; Your init file should contain only one such instance.
|
;; Your init file should contain only one such instance.
|
||||||
;; If there is more than one, they won't work right.
|
;; If there is more than one, they won't work right.
|
||||||
)
|
)
|
||||||
>>>>>>> origin/master
|
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue