;; You should have received a copy of the GNU General Public License
;; along with XEmacs; see the file COPYING. If not, write to the Free
-;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
-;; 02111-1307, USA.
+;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+;; MA 02110-1301, USA.
;;; Code:
;;;
(condition-case nil
+ (require 'timer-funcs)
+ (error nil))
+(condition-case nil
(require 'timer)
- (error
+ (error nil))
+(or
+ (or (featurep 'timer-funcs) (featurep 'timer))
+ (progn
(require 'itimer)
(if (and (= emacs-major-version 19) (<= emacs-minor-version 14))
(defun-maybe run-at-time (time repeat function &rest args)