aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--emms.el19
1 files changed, 11 insertions, 8 deletions
diff --git a/emms.el b/emms.el
index e17f8eb..1c2a083 100644
--- a/emms.el
+++ b/emms.el
@@ -363,14 +363,6 @@ See `emms-repeat-track'."
(when (not emms-player-playing-p)
(error "No EMMS player playing right now")))
-(defun emms-cancel-timer (timer)
- "Cancel the given TIMER."
- (when timer
- (cond ((fboundp 'cancel-timer)
- (cancel-timer timer))
- ((fboundp 'delete-itimer)
- (delete-itimer timer)))))
-
;;; Tracks
@@ -1183,5 +1175,16 @@ or negative to seek backwards."
(list (cons name value))))))
dict)
+
+;;; XEmacs compatibility
+
+(defun emms-cancel-timer (timer)
+ "Cancel the given TIMER."
+ (when timer
+ (cond ((fboundp 'cancel-timer)
+ (cancel-timer timer))
+ ((fboundp 'delete-itimer)
+ (delete-itimer timer)))))
+
(provide 'emms)
;;; emms.el ends here