On Thu, Jan 13, 2000 at 05:48:30PM -0500, [EMAIL PROTECTED] wrote:
> JNP> Oh right. Gee, that isn't documented yet. (Oops :-) Try this:
>
> we have to work on the docs for event. seriously! i have too much on my
> plate right now but it has to get done if we are serious about one event
> loop for all perl.
Here's a start:
==== //depot/D/Event/lib/Event.pod#39 - /cache/D/Event/lib/Event.pod ====
--- /tmp/tmp.2136.0 Wed Jan 19 10:25:44 2000
+++ /cache/D/Event/lib/Event.pod Wed Jan 19 10:24:02 2000
@@ -204,7 +204,7 @@
=item io
Extra attributes: fd => $fd, poll => 'rwe', got => 'rwet',
-[timeout => $seconds, hard => $bool]
+[timeout => $seconds, hard => $bool, timeout_cb => \&code]
The callback is invoked when the file descriptor, C<fd>, has data to
be read, written, or pending exceptions. C<fd> can be a GLOB, an
@@ -213,6 +213,9 @@
Note that it is your option whether to have multiple watchers per file
handle or to use a single watcher for all event conditions.
+If timeout_cb is set then timeouts use this alternate callback instead
+of the main callback.
+
=item signal
Extra attribute: signal => $str
@@ -399,6 +402,14 @@
=item timeout => $seconds
The number of seconds before a watcher times out.
+
+=item timeout_cb => \&code
+
+=item timeout_cb => [$class_or_object, $method_name]
+
+This is an optional attribute for use when it is desired that timeouts
+be serviced in a separate code path than normal events. When this
+attribute is unset, timeouts are serviced by C<cb>.
=item var => $ref
--
"Does `competition' have an abstract purpose?"
via, but not speaking for Deutsche Bank