From aee8eefefad7d3c9429c87014c5a8cb5753ffad0 Mon Sep 17 00:00:00 2001 From: ueno Date: Fri, 4 Feb 2005 02:58:11 +0000 Subject: [PATCH] * riece-xemacs.el (riece-run-at-time): Accept nil as the current-time. --- lisp/ChangeLog | 2 ++ lisp/riece-xemacs.el | 2 +- 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1ef82a7..fee5cbb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,7 @@ 2005-02-04 Daiki Ueno + * riece-xemacs.el (riece-run-at-time): Accept nil as the current-time. + * riece-compat.el (riece-read-passwd): Changed default value. * riece-400.el (riece-handle-475-message): Don't bind inhibit-quit diff --git a/lisp/riece-xemacs.el b/lisp/riece-xemacs.el index 70735ac..5df81ba 100644 --- a/lisp/riece-xemacs.el +++ b/lisp/riece-xemacs.el @@ -100,7 +100,7 @@ name `(lambda () (,function ,@args)) - time repeat) + (or time (current-time)) repeat) name)) (defun riece-run-with-idle-timer (time repeat function &rest args) -- 1.7.10.4