aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael Olson <mwolson@gnu.org>2006-06-09 04:36:00 +0000
committerMichael Olson <mwolson@gnu.org>2006-06-09 04:36:00 +0000
commit0d9aba2a5168b500a7b9073730d00113411d2f16 (patch)
treedb4b185b791b02ad2cff4c7836b55144c20418c4
parent4a809e2083f80a70db9a8d128e194ff976baa08c (diff)
emms-player-mpd: Rename volume functions to better match the namespace created by emms-volume.el.
darcs-hash:20060609043643-1bfb2-375117b7d9fef9f60119cb64b42095c609448a30.gz
-rw-r--r--emms-player-mpd.el14
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