* poe-xemacs.el (run-at-time): Attempt to load `timer-funcs' before `timer'.

[elisp/apel.git] / poe-xemacs.el

diff --git a/poe-xemacs.el b/poe-xemacs.el
index 8915103..5824235 100644 (file)
--- a/poe-xemacs.el
+++ b/poe-xemacs.el
@@ -81,9 +81,14 @@ When called interactively, prompt for the name of the color to use."
 ;;; @ timer
 ;;;
 
-(condition-case nil
-    (require 'timer)
-  (error
+(or
+ (condition-case nil
+     (require 'timer-funcs)
+   (error nil))
+ (condition-case nil
+     (require 'timer)
+   (error nil))
+ (progn
    (require 'itimer)
    (if (and (= emacs-major-version 19) (<= emacs-minor-version 14))
        (defun-maybe run-at-time (time repeat function &rest args)