emms-player-mpd: Rename volume functions to better match the namespace created by emms-volume.el.

darcs-hash:20060609043643-1bfb2-375117b7d9fef9f60119cb64b42095c609448a30.gz

1 files changed, 9 insertions, 5 deletions

diff --git a/emms-player-mpd.el b/emms-player-mpd.el
index 1279057..2d568de 100644
--- a/emms-player-mpd.el
+++ b/emms-player-mpd.el
@@ -943,7 +943,9 @@ from other functions."
   (interactive)
   (emms-player-mpd-send "previous" nil #'ignore))
 
-(defun emms-player-mpd-volume-change (amount)
+;;; Volume
+
+(defun emms-volume-mpd-change (amount)
   "Change volume up or down by AMOUNT, depending on whether it is
 positive or negative."
   (interactive "MVolume change amount (+ increase, - decrease): ")
@@ -955,15 +957,17 @@ positive or negative."
         (concat "setvol \"" (number-to-string new-volume) "\"")
         nil #'ignore)))))
 
-(defun emms-player-mpd-volume-up ()
+(defun emms-volume-mpd-raise ()
   "Increase the volume."
   (interactive)
-  (emms-player-mpd-volume-change 5))
+  (emms-volume-mpd-change 5))
 
-(defun emms-player-mpd-volume-down ()
+(defun emms-volume-mpd-lower ()
   "Decrease the volume."
   (interactive)
-  (emms-player-mpd-volume-change -5))
+  (emms-volume-mpd-change -5))
+
+;;; Now playing
 
 (defun emms-player-mpd-show-1 (closure response)
   (let* ((info (emms-player-mpd-get-alist