zeroclickinfo-goodies/t/WhereAmI.t

#!/usr/bin/env perl

use strict;
use warnings;
use Test::More;
use DDG::Test::Goodie;

zci answer_type => 'whereami';
zci is_cached   => 0;

my @test_loc = (
    '',
    structured_answer => {
        id => 'whereami',
        name => 'Answer',
        data => {
            lat => 40.1246,
            lon => -75.5385
        },
        templates => {
            group => 'places'
        }
    });

ddg_goodie_test(
    [qw(DDG::Goodie::WhereAmI)],
    'where am I'              => test_zci(@test_loc),
    'where am I?'             => test_zci(@test_loc),
    'my location'             => test_zci(@test_loc),
    'my location is nowhere!' => undef,
);

done_testing;