Commit 702002d7 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

EFA, efa-m: Add timeout parameter

parent e2ece5a9

Changelog

+1 −0
Original line number Diff line number Diff line 
git HEAD



    * EFA: Fix crash when ->results is called after a network error occured

    * EFA: Add timeout parameter to constructor (default: 10 seconds)

    * efa-m: Add --timeeout option



Travel::Status::DE::VRR 1.08 - Mon Mar 03 2014

bin/efa-m

+3 −2
Original line number Diff line number Diff line
@@ -57,7 +57,7 @@ my $status = Travel::Status::DE::EFA->new( 
	name    => $input,

	time    => $time,

	type    => $input_type,

	timeout => $timeout // 10,

	timeout => $timeout,

);



sub show_help {
@@ -252,7 +252,8 @@ than others. See Travel::Status::DE::EFA(3pm) for alternatives. 


=item B<--timeout> I<seconds>



Set timeout for HTTP requests. Default: 10 seconds.

Set timeout for HTTP requests. Default: 10 seconds. Set to 0 or a negative

value to disable it.



=item B<-V>, B<--version>

lib/Travel/Status/DE/EFA.pm

+10 −0
Original line number Diff line number Diff line
@@ -18,6 +18,11 @@ use XML::LibXML; 
sub new {

	my ( $class, %opt ) = @_;



	$opt{timeout} //= 10;

	if ( $opt{timeout} <= 0 ) {

		delete $opt{timeout};

	}



	my $ua  = LWP::UserAgent->new(%opt);

	my @now = localtime( time() );
@@ -473,6 +478,11 @@ B<stop> (stop/station name). 


address / poi / stop name to list departures for.



=item B<timeout> => I<seconds>



Request timeout, the argument is passed on to LWP::UserAgent(3pm).

Default: 10 seconds. Set to 0 or a negative value to disable it.



=back



=item $status->errstr