diff options
author | Mark Oteiza <mvoteiza@udel.edu> | 2015-10-13 22:08:48 -0400 |
---|---|---|
committer | Mark Oteiza <mvoteiza@udel.edu> | 2015-10-13 22:27:57 -0400 |
commit | a7e6637162827a09c13e72a49412b3ab915cf473 (patch) | |
tree | e0ba9b35412d38aead64112688148364e09c9d94 /lisp/mpc.el | |
parent | 9fa9c26e42ddb3f67133bc18112147926bae8a50 (diff) |
Add bindings and menu items for prev and next tracks
* lisp/mpc.el (mpc-mode-map): Bind ">" to mpc-next,
"<" to mpc-prev.
(mpc-mode-menu): Add corresponding menu items
Diffstat (limited to 'lisp/mpc.el')
-rw-r--r-- | lisp/mpc.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/mpc.el b/lisp/mpc.el index 2142529b2e..7d684d24c0 100644 --- a/lisp/mpc.el +++ b/lisp/mpc.el @@ -1109,12 +1109,16 @@ If PLAYLIST is t or nil or missing, use the main playlist." ;; is applied elsewhere :-( ;; (define-key map [(double mouse-2)] 'mpc-play-at-point) (define-key map "p" 'mpc-pause) + (define-key map ">" 'mpc-next) + (define-key map "<" 'mpc-prev) (define-key map "g" nil) map)) (easy-menu-define mpc-mode-menu mpc-mode-map "Menu for MPC.el." '("MPC.el" + ["Next track" mpc-next] + ["Previous track" mpc-prev] ["Add new browser" mpc-tagbrowser] ["Update DB" mpc-update] ["Quit" mpc-quit])) |