From 4b5406e4cbcd86ce732bb3277b3e29fd6fe13851 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Thu, 4 Apr 1996 16:35:55 +0000
Subject: [PATCH] (run-at-time): Allow floating REPEAT values.

---
 lisp/timer.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/timer.el b/lisp/timer.el
index ebf52a85790..1761ecc8759 100644
--- a/lisp/timer.el
+++ b/lisp/timer.el
@@ -286,7 +286,7 @@ This function returns a timer object which you can use in `cancel-timer'."
       (error "Invalid time format"))
 
   (or (null repeat)
-      (natnump repeat)
+      (numberp repeat)
       (error "Invalid repetition interval"))
 
   (let ((timer (timer-create)))
-- 
2.39.2