fix openweathermap typos

This commit is contained in:
Colin Gagnaire 2019-06-05 10:46:24 +02:00
parent 14674014c6
commit 91a2250d51
1 changed files with 6 additions and 10 deletions

View File

@ -83,17 +83,13 @@ sub set_defaults {
sub check_options {
my ($self, %options) = @_;
$self->{hostname} = (defined($self->{option_results}->{hostname})) ? $self->{option_results}->{hostname} : undef;
$self->{hostname} = (defined($self->{option_results}->{hostname})) ? $self->{option_results}->{hostname} : 'api.openweathermap.org';
$self->{port} = (defined($self->{option_results}->{port})) ? $self->{option_results}->{port} : 443;
$self->{proto} = (defined($self->{option_results}->{proto})) ? $self->{option_results}->{proto} : 'https';
$self->{url_path} = (defined($self->{option_results}->{url_path})) ? $self->{option_results}->{url_path} : '/data/2.5';
$self->{timeout} = (defined($self->{option_results}->{timeout})) ? $self->{option_results}->{timeout} : 10;
$self->{api_token} = (defined($self->{option_results}->{api_token})) ? $self->{option_results}->{api_token} : '';
if (!defined($self->{hostname}) || $self->{hostname} eq '') {
$self->{output}->add_option_msg(short_msg => "Need to specify --hostname option.");
$self->{output}->option_exit();
}
if (!defined($self->{api_token}) || $self->{api_token} eq '') {
$self->{output}->add_option_msg(short_msg => "Need to specify --api-token option.");
$self->{output}->option_exit();
@ -150,7 +146,7 @@ sub request_api {
$self->{output}->add_option_msg(short_msg => "Cannot decode json response: $@");
$self->{output}->option_exit();
}
if (!defined($decoded->{cod}) || $decoded->{cod} != 200) {
if (!defined($decoded->{code}) || $decoded->{code} != 200) {
$self->{output}->output_add(long_msg => "Error message : " . $decoded->{errorDetails}, debug => 1);
$self->{output}->add_option_msg(short_msg => "API return error code '" . $decoded->{result} . "' (add --debug option for detailed message)");
$self->{output}->option_exit();
@ -164,21 +160,21 @@ __END__
=head1 NAME
Rudder Rest API
OpenWeatherMap Rest API
=head1 SYNOPSIS
Rudder Rest API custom mode
OpenWeatherMap Rest API custom mode
=head1 REST API OPTIONS
Rudder Rest API
OpenWeatherMap Rest API
=over 8
=item B<--hostname>
Rudder API hostname (api.openweathermap.org
OpenWeatherMap API hostname (Default: 'api.openweathermap.org')
=item B<--port>