Unverified Commit f35418a5 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

devmode: print request

parent ac225f78

lib/Travel/Status/DE/EFA.pm

+7 −0
Original line number Diff line number Diff line
@@ -284,6 +284,13 @@ sub new { 
		return $self;

	}



	if ( $self->{developer_mode} ) {

		say 'POST ' . $self->{efa_url};

		while ( my ( $key, $value ) = each %{ $self->{post} } ) {

			printf( "%30s = %s\n", $key, $value );

		}

	}



	my $response = $self->{ua}->post( $self->{efa_url}, $self->{post} );



	if ( $response->is_error ) {