From 7fe71e6381915e775deed571f7b5c0babdf0f394 Mon Sep 17 00:00:00 2001
From: Michael Olson <mwolson@gnu.org>
Date: Wed, 4 Jan 2006 06:10:00 +0000
Subject: Use timers in a way that is compatible with both Emacs and XEmacs.

darcs-hash:20060104061024-1bfb2-a35972f84a96c27a9a4bee6a245a8cbe2d6a8dd1.gz
---
 emms.el | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'emms.el')

diff --git a/emms.el b/emms.el
index 73dfd86..e17f8eb 100644
--- a/emms.el
+++ b/emms.el
@@ -363,6 +363,14 @@ 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
 
-- 
cgit v1.2.3