aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--emms-player-mpd.el14
-rw-r--r--emms.texinfo7
2 files changed, 18 insertions, 3 deletions
diff --git a/emms-player-mpd.el b/emms-player-mpd.el
index 1c6e3dd..8e28237 100644
--- a/emms-player-mpd.el
+++ b/emms-player-mpd.el
@@ -185,12 +185,20 @@ It should take same arguments as `open-network-stream' does."
string)
:group 'emms-player-mpd)
+(defcustom emms-player-mpd-volume-change-amount 5
+ "The amount to use when raising or lowering the volume using the
+emms-volume interface.
+
+This should be a positive integer."
+ :type 'integer
+ :group 'emms-player-mpd)
+
(defcustom emms-player-mpd-check-interval 1
"How often to check to see whether MusicPD has advanced to the
next song. This may be an integer or a floating point number.
This is used only if `emms-player-mpd-sync-playlist' is non-nil"
- :type 'integer
+ :type 'number
:group 'emms-player-mpd)
(defcustom emms-player-mpd-verbose nil
@@ -918,12 +926,12 @@ positive or negative."
(defun emms-volume-mpd-raise ()
"Increase the volume."
(interactive)
- (emms-volume-mpd-change 5))
+ (emms-volume-mpd-change emms-player-mpd-volume-change-amount))
(defun emms-volume-mpd-lower ()
"Decrease the volume."
(interactive)
- (emms-volume-mpd-change -5))
+ (emms-volume-mpd-change (- 0 emms-player-mpd-volume-change-amount)))
;;; Now playing
diff --git a/emms.texinfo b/emms.texinfo
index d9ff358..db4bd60 100644
--- a/emms.texinfo
+++ b/emms.texinfo
@@ -1653,6 +1653,13 @@ order to prime the cache.
@subsubheading emms-volume.el integration
+@defopt emms-player-mpd-volume-change-amount
+The amount to use when raising or lowering the volume using the
+emms-volume interface.
+
+This should be a positive integer.
+@end defopt
+
@defun emms-volume-mpd-change amount
Change volume up or down by AMOUNT, depending on whether it is
positive or negative.