File Coverage

blib/lib/Weather/YR/TextLocation.pm

Criterion	Covered	Total	%
statement	9	14	64.2
branch			n/a
condition			n/a
subroutine	3	4	75.0
pod			n/a
total	12	18	66.6

package Weather::YR::TextLocation;
use Moose;
use namespace::autoclean;

extends 'Weather::YR::Base';

use Mojo::URL;

has 'lang' => ( isa => 'Str', is => 'rw', default => 'nb' );

has 'url' => ( isa => 'Mojo::URL', is => 'ro', lazy_build => 1 );

sub _build_url {
    my $self = shift;

    my $url = $self->service_url->clone;
    $url->path ( '/weatherapi/textlocation/1.0/' );
    $url->query(
        latitude  => $self->lat_as_string,
        longitude => $self->lon_as_string,
        language  => $self->lang
    );

    return $url;
}

__PACKAGE__->meta->make_immutable;

1;