- ;;; ~/.dotfiles/emacs/.config/doom/+mpd.el -*- lexical-binding: t; -*-
- (defun mpdel-playlist-play ()
- "Start playing the song at point."
- (interactive)
- (if (derived-mode-p 'mpdel-playlist-current-playlist-mode)
- (libmpdel-play-song (navigel-entity-at-point))
- (mpdel-core-insert-current-playlist)))
- (map! :leader
- (:prefix "-"
- :desc "MPD Open playlist" "-" #'mpdel-playlist-open
- :desc "MPD Remove at point" "d" #'mpdel-playlist-delete
- :desc "MPD Start at point" "s" #'mpdel-playlist-play
- :desc "MPD Next track" "n" #'libmpdel-playback-next
- :desc "MPD Previous track" "p" #'libmpdel-playback-previous))
|
