aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorforcer <forcer>2006-05-31 00:33:00 +0000
committerforcer <mwolson@gnu.org>2006-05-31 00:33:00 +0000
commitcff09f0bf5cc55233383a6a8409dd808cd2997f4 (patch)
tree9b9887a85060f1f39f2883c167a7817de0dc44e5
parent2ecf0171dd396fabfa4b6919ef10b7a561164f0f (diff)
emms-volume.el: Cosmetic stuff, defvar -> defcustom
darcs-hash:20060531003343-2189f-8a3926a21e63a49ddf66415e9f17041485dcd721.gz
-rw-r--r--emms-volume.el23
1 files changed, 15 insertions, 8 deletions
diff --git a/emms-volume.el b/emms-volume.el
index bfd2733..a4c2efd 100644
--- a/emms-volume.el
+++ b/emms-volume.el
@@ -43,20 +43,27 @@
;;; Code:
+
+(require 'emms)
+(require 'emms-playlist-mode)
+(require 'emms-volume-amixer)
+
;; General volume setting related code.
-(defvar emms-volume-raise-function 'emms-volume-amixer-raise
+(defcustom emms-volume-raise-function 'emms-volume-amixer-raise
"*The function to use to raise the volume.
If you have your own functions for changing volume, set this and
- `emms-volume-lower-function' accordingly.")
+ `emms-volume-lower-function' accordingly."
+ :type '(choice (const :tag "Amixer" emms-volume-amixer-raise)
+ (function :tag "Lisp function"))
+ :group 'emms)
-(defvar emms-volume-lower-function 'emms-volume-amixer-lower
+(defcustom emms-volume-lower-function 'emms-volume-amixer-lower
"*The function to use to lower the volume.
If you have your own functions for changing volume, set this and
- `emms-volume-raise-function' accordingly.")
-
-(require 'emms)
-(require 'emms-playlist-mode)
-(require 'emms-volume-amixer)
+ `emms-volume-raise-function' accordingly."
+ :type '(choice (const :tag "Amixer" emms-volume-amixer-lower)
+ (function :tag "Lisp function"))
+ :group 'emms)
(defun emms-volume-raise ()
"Raise the speaker volume."