Gtk::io patch

[Jim Edwards <jedwards inmet gov br>]

Paolo Molaro wrote:

> On 07/13/01 Jim Edwards wrote:
> > It seems like I´m talking to myself on this list lately.
>
> Dude, maybe people are busy.
> If you need around the clock support I'm sure some company
> is willing to accept your money ;-)

I never asked for it, but I´ve been the only poster in two weeks.  I´m not
as worried about my questions not being answered as I am about commiting to
a tool that doesn´t have much momentum for continued development.  I would
have thought this tool would generate more interest than I´m seeing.
Here is a simple patch that allows one to modify the timeout using
$Gtk::io::timeout.

Index: io.pm
===================================================================
RCS file: /cvs/gnome/gnome-perl/Gtk/io.pm,v
retrieving revision 1.1
diff -r1.1 io.pm
1a2
> use strict;
3,5c4,8
< my %pending = ();
< my $sweepid;
< my $timeout = 2;
---
> use vars qw(%pending $sweepid $timeout);
> BEGIN{
>   %pending = ();
>   $timeout = 2;
> }
23c26
<     warn "Timeout on $k\n";
---
>     warn "Timeout on $k after $timeout seconds\n";
85a89
> use vars qw(@ISA);
87a92
> use vars qw(@ISA);
89a95
> use vars qw(@ISA);


> A patch would be gladly accepted to improve the module
> (as well as documentation and maybe a test suite, if you
> got extra time:-).
>
> lupus
>
> --
> -----------------------------------------------------------------
> lupus debian org                                     debian/rules
> lupus ximian com                             Monkeys do it better