mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-26 10:49:33 +00:00
Code Issues Releases Activity

(run-at-time): Doc fix.

Browse Source
This commit is contained in:
Glenn Morris 2007-03-31 23:22:35 +00:00
parent 6a4c2b04cc
commit b9be25fd10
1 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
lisp/emacs-lisp/timer.el
View File

@ -360,11 +360,16 @@ This function is called, by name, directly by the C code."
(defun run-at-time (time repeat function &rest args) (defun run-at-time (time repeat function &rest args)
"Perform an action at time TIME. "Perform an action at time TIME.
Repeat the action every REPEAT seconds, if REPEAT is non-nil. Repeat the action every REPEAT seconds, if REPEAT is non-nil.
TIME should be a string like \"11:23pm\", nil meaning now, a number of seconds TIME should be one of: a string giving an absolute time like
from now, a value from `current-time', or t (with non-nil REPEAT) \"11:23pm\" (the acceptable formats are those recognized by
meaning the next integral multiple of REPEAT. `diary-entry-time'; note that such times are interpreted as times
REPEAT may be an integer or floating point number. today, even if in the past); a string giving a relative time like
The action is to call FUNCTION with arguments ARGS. \"2 hours 35 minutes\" (the acceptable formats are those
recognized by `timer-duration'); nil meaning now; a number of
seconds from now; a value from `encode-time'; or t (with non-nil
REPEAT) meaning the next integral multiple of REPEAT. REPEAT may
be an integer or floating point number. The action is to call
FUNCTION with arguments ARGS.
This function returns a timer object which you can use in `cancel-timer'." This function returns a timer object which you can use in `cancel-timer'."
(interactive "sRun at time: \nNRepeat interval: \naFunction: ") (interactive "sRun at time: \nNRepeat interval: \naFunction: ")
@ -385,7 +390,7 @@ This function returns a timer object which you can use in `cancel-timer'."
(if (numberp time) (if (numberp time)
(setq time (timer-relative-time (current-time) time))) (setq time (timer-relative-time (current-time) time)))
;; Handle relative times like "2 hours and 35 minutes" ;; Handle relative times like "2 hours 35 minutes"
(if (stringp time) (if (stringp time)
(let ((secs (timer-duration time))) (let ((secs (timer-duration time)))
(if secs (if secs