diff options
-rw-r--r-- | emms-player-mpd.el | 14 | ||||
-rw-r--r-- | emms.texinfo | 7 |
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. |