From: Mark Oteiza <mvoteiza@udel.edu>
Date: Wed, 14 Oct 2015 02:08:48 +0000 (-0400)
Subject: Add bindings and menu items for prev and next tracks
X-Git-Tag: emacs-25.0.90~1135
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a7e6637162827a09c13e72a49412b3ab915cf473;p=emacs.git

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
---

diff --git a/lisp/mpc.el b/lisp/mpc.el
index 2142529b2e0..7d684d24c0f 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]))