Reworked empv: update empv-hydra and use my fork of empv.

This commit is contained in:
2025-02-17 15:02:22 +00:00
parent 70940c79bd
commit 1f8e6a1eb1

View File

@@ -3838,7 +3838,7 @@ Emacs MPV bindings, with very cool controls for queuing files for
playing.
#+begin_src emacs-lisp
(use-package empv
:straight t
:straight (:host github :repo "oreodave/empv.el")
:defer t
:init
(setq empv-audio-dir (list (expand-file-name "~/Media/audio")
@@ -3858,67 +3858,38 @@ playing.
("SomaFM - The Trip" . "http://www.somafm.com/thetrip.pls")))
:hydra
(empv-hydra
nil "Hydra for EMPV"
("(" #'empv-chapter-prev
"chapter-prev" :column "playback")
(")" #'empv-chapter-next
"chapter-next" :column "playback")
("0" #'empv-volume-up
"volume-up" :column "playback")
("9" #'empv-volume-down
"volume-down" :column "playback")
("[" #'empv-playback-speed-down
"playback-speed-down" :column "playback")
("]" #'empv-playback-speed-up
"playback-speed-up" :column "playback")
("_" #'empv-toggle-video
"toggle-video" :column "playback")
("q" #'empv-save-and-exit
"save-and-quit" :column "playback")
("s" #'empv-seek
"seek" :column "playback")
("t" #'empv-toggle
"toggle" :column "playback")
("x" #'empv-chapter-select
"chapter-select" :column "playback")
("N" #'empv-playlist-prev
"playlist-prev" :column "playlist")
("C" #'empv-playlist-clear
"playlist-clear" :column "playlist")
("n" #'empv-playlist-next
"playlist-next" :column "playlist")
("p" #'empv-playlist-select
"playlist-select" :column "playlist")
("S" #'empv-playlist-shuffle
"playlist-shuffle" :column "playlist")
("M-s" #'empv-playlist-save-to-file
"playlist-save-to-file" :column "playlist")
("a" #'empv-play-audio
"play-audio" :column "play")
("R" #'empv-play-random-channel
"play-random-channel" :column "play")
("d" #'empv-play-directory
"play-directory" :column "play")
("f" #'empv-play-file
"play-file" :column "play")
("o" #'empv-play-or-enqueue
"play-or-enqueue" :column "play")
("r" #'empv-play-radio
"play-radio" :column "play")
("v" #'empv-play-video
"play-video" :column "play")
("." #'empv-play-thing-at-point
"play-at-point" :column "play" :exit t)
("i" #'empv-display-current
"display-current" :column "misc")
("l" #'empv-log-current-radio-song-name
"log-current-radio-song-name" :column "misc")
("c" #'empv-copy-path
"copy-path" :column "misc")
("Y" #'empv-youtube-last-results
"youtube-last-results" :column "misc")
("y" #'empv-youtube
"youtube" :column "misc"))
nil "EMPV Hydra:"
("o" #'empv-play-or-enqueue "play or enqueue" :column "Play")
("f" #'empv-play-file "play file" :column "Play")
("d" #'empv-play-directory "play directory" :column "Play")
("v" #'empv-play-video "play video" :column "Play")
("a" #'empv-play-audio "play audio" :column "Play")
("q" #'empv-exit "exit" :column "Play" :exit t)
("Q" #'empv-save-and-exit "save and exit" :column "Play" :exit t)
("[" #'empv-playback-speed-down "playback speed down" :column "Playback")
("]" #'empv-playback-speed-up "playback speed up" :column "Playback")
("0" #'empv-volume-up "volume up" :column "Playback")
("9" #'empv-volume-down "volume down" :column "Playback")
("(" #'empv-chapter-prev "chapter prev" :column "Playback")
(")" #'empv-chapter-next "chapter next" :column "Playback")
("x" #'empv-chapter-select "chapter select" :column "Playback")
("p" #'empv-playlist-select "playlist select" :column "Playlist")
("L" #'empv-playlist-load-from-file "playlist load" :column "Playlist")
("s" #'empv-playlist-shuffle "playlist shuffle" :column "Playlist")
("C" #'empv-playlist-clear "playlist clear" :column "Playlist")
("n" #'empv-playlist-next "playlist next" :column "Playlist")
("N" #'empv-playlist-prev "playlist prev" :column "Playlist")
("r" #'empv-play-radio "play radio" :column "Remote Play")
("R" #'empv-play-random-channel "play random channel" :column "Remote Play")
("l" #'empv-log-current-radio-song-name "log current radio song name" :column "Remote Play")
("y" #'empv-youtube "youtube" :column "Remote Play")
("Y" #'empv-youtube-last-results "youtube last results" :column "Remote Play")
("t" #'empv-toggle "toggle" :column "Toggle")
("_" #'empv-toggle-video "toggle video" :column "Toggle")
("8" #'empv-toggle-current-loop "toggle current loop" :column "Toggle")
("e" #'empv-toggle-event-display "toggle event display" :column "Toggle")
("i" #'empv-display-current "display current" :column "Utility")
("c" #'empv-copy-path "copy path" :column "Utility"))
:general
(app-leader
"e" #'empv-hydra/body))