* riece-xemacs.el (riece-run-with-idle-timer): Pass an integer to

the RESTART argument of start-itimer.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 828554f..d9bc8ce 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2003-10-26  Daiki Ueno  <ueno@unixuser.org>
 
 2003-10-26  Daiki Ueno  <ueno@unixuser.org>
 

+       * riece-xemacs.el (riece-run-with-idle-timer): Pass an integer to
+       the RESTART argument of start-itimer.
+

        * riece-commands.el (riece-command-user-list-scroll-down): Rename
        from riece-command-nick-scroll-down.
        (riece-command-user-list-scroll-up): Rename from
        * riece-commands.el (riece-command-user-list-scroll-down): Rename
        from riece-command-nick-scroll-down.
        (riece-command-user-list-scroll-up): Rename from

diff --git a/lisp/riece-xemacs.el b/lisp/riece-xemacs.el
index 6327de6..519b41a 100644 (file)
--- a/lisp/riece-xemacs.el
+++ b/lisp/riece-xemacs.el
@@ -112,7 +112,7 @@
      name
      `(lambda ()
        (,function ,@args))
      name
      `(lambda ()
        (,function ,@args))

-     time repeat t)
+     time (if repeat 1) t)

     name))
 
 (defalias 'riece-cancel-timer 'delete-itimer)
     name))
 
 (defalias 'riece-cancel-timer 'delete-itimer)