Revision: emacs@sv.gnu.org/emacs--devo--0--patch-220

Creator:  Michael Olson <mwolson@gnu.org>

Improve tq.el.

* lispref/processes.texi (Transaction Queues): Mention the new optional
  `delay-question' argument for `tq-enqueue'.

* lisp/emacs-lisp/tq.el: Improve comments.
  (tq-queue-head-question): New accessor function.
  (tq-queue-head-regexp, tq-queue-head-closure, tq-queue-head-fn):
  Update for modified queue structure.
  (tq-queue-add): Accept `question' argument.
  (tq-queue-pop): If a question is pending, send it.
  (tq-enqueue): Accept new optional argument `delay-question'.  If
  this is non-nil, and at least one other question is pending a
  response, queue the question rather than sending it immediately.

2 files changed, 10 insertions, 1 deletions

diff --git a/lispref/ChangeLog b/lispref/ChangeLog
index f16982eb414..c3591cbb64a 100644
--- a/lispref/ChangeLog
+++ b/lispref/ChangeLog
@@ -1,3 +1,8 @@
+2006-04-15  Michael Olson  <mwolson@gnu.org>
+
+        * processes.texi (Transaction Queues): Mention the new optional
+        `delay-question' argument for `tq-enqueue'.
+
 2006-04-13  Bill Wohler  <wohler@newt.com>
 
         * customize.texi (Common Keywords): Use dotted notation for
diff --git a/lispref/processes.texi b/lispref/processes.texi
index 5f0cfb0edf0..44da398770d 100644
--- a/lispref/processes.texi
+++ b/lispref/processes.texi
@@ -1508,7 +1508,7 @@ process, or it may be a TCP connection to a server, possibly on another
 machine.
 @end defun
 
-@defun tq-enqueue queue question regexp closure fn
+@defun tq-enqueue queue question regexp closure fn &optional delay-question
 This function sends a transaction to queue @var{queue}.  Specifying the
 queue has the effect of specifying the subprocess to talk to.
 
@@ -1521,6 +1521,10 @@ The argument @var{regexp} is a regular expression that should match
 text at the end of the entire answer, but nothing before; that's how
 @code{tq-enqueue} determines where the answer ends.
 
+If the argument @var{delay-question} is non-nil, delay sending this
+question until the process has finished replying to any previous
+questions.  This produces more reliable results with some processes."
+
 The return value of @code{tq-enqueue} itself is not meaningful.
 @end defun