# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1120440150 0
# Node ID f44f159ea6de6ab734fe35dbcca1851cde50de4a
# Parent  ef9f3b48923dde3b824c9996171d9f913890439a
(with-timeout): Improve argument/docstring consistency.

diff -r ef9f3b48923d -r f44f159ea6de lisp/emacs-lisp/timer.el
--- a/lisp/emacs-lisp/timer.el	Mon Jul 04 01:13:26 2005 +0000
+++ b/lisp/emacs-lisp/timer.el	Mon Jul 04 01:22:30 2005 +0000
@@ -408,12 +408,11 @@
 (defmacro with-timeout (list &rest body)
   "Run BODY, but if it doesn't finish in SECONDS seconds, give up.
 If we give up, we run the TIMEOUT-FORMS and return the value of the last one.
-The call should look like:
- (with-timeout (SECONDS TIMEOUT-FORMS...) BODY...)
 The timeout is checked whenever Emacs waits for some kind of external
-event \(such as keyboard input, input from subprocesses, or a certain time);
+event (such as keyboard input, input from subprocesses, or a certain time);
 if the program loops without waiting in any way, the timeout will not
-be detected."
+be detected.
+\n(fn (SECONDS TIMEOUT-FORMS...) BODY)"
   (let ((seconds (car list))
 	(timeout-forms (cdr list)))
     `(let ((with-timeout-tag (cons nil nil))