aboutsummaryrefslogtreecommitdiff
path: root/emms-volume.el
diff options
context:
space:
mode:
authorforcer <forcer>2006-05-31 00:23:00 +0000
committerforcer <mwolson@gnu.org>2006-05-31 00:23:00 +0000
commit2ecf0171dd396fabfa4b6919ef10b7a561164f0f (patch)
treee8e6a081011bd810beb2c3a4611080dea1e84f84 /emms-volume.el
parentf168ce641347671400a631743681bbdc71bd3c33 (diff)
emms-volume.el: Minor cosmetic cleanup
darcs-hash:20060531002351-2189f-cedd0ca3350a02fc8deda9ec51e1e33f05ab9ecc.gz
Diffstat (limited to 'emms-volume.el')
-rw-r--r--emms-volume.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/emms-volume.el b/emms-volume.el
index 1b3f4d2..bfd2733 100644
--- a/emms-volume.el
+++ b/emms-volume.el
@@ -105,14 +105,15 @@ If you have your own functions for changing volume, set this and
(defun emms-volume-mode-set-timer ()
"Set a new `emms-volume-minor-mode' timer."
- (unless (null emms-volume-mode-timer)
+ (when emms-volume-mode-timer
(emms-volume-mode-disable-timer))
(setq emms-volume-mode-timer (run-at-time emms-volume-mode-timeout
- nil
- 'emms-volume-mode-timer-timeout)))
+ nil
+ 'emms-volume-mode-timer-timeout)))
(defun emms-volume-mode-timer-timeout ()
"Function to disable `emms-volume-minor-mode' at timeout."
+ (setq emms-volume-mode-timer nil)
(emms-volume-minor-mode -1))
(defun emms-volume-mode-start-or-extend ()
@@ -122,5 +123,4 @@ If you have your own functions for changing volume, set this and
(emms-volume-mode-set-timer))
(provide 'emms-volume)
-
;;; emms-volume.el ends here