From 22e96870ced8f5618361beb822d7bf586eb43ce9 Mon Sep 17 00:00:00 2001 From: Emmanuel Rodriguez Date: Sun, 17 May 2009 22:45:45 +0200 Subject: [PATCH] The tests for Champlain::MapSourceDesc are in ChamplainMapSourceDesc.t --- .../Champlain/t/ChamplainMapSourceFactory.t | 20 +------------------ 1 file changed, 1 insertion(+), 19 deletions(-) diff --git a/bindings/perl/Champlain/t/ChamplainMapSourceFactory.t b/bindings/perl/Champlain/t/ChamplainMapSourceFactory.t index f163687..0fd726c 100644 --- a/bindings/perl/Champlain/t/ChamplainMapSourceFactory.t +++ b/bindings/perl/Champlain/t/ChamplainMapSourceFactory.t @@ -3,7 +3,7 @@ use strict; use warnings; -use Clutter::TestHelper tests => 31; +use Clutter::TestHelper tests => 22; use Champlain ':coords'; @@ -62,24 +62,6 @@ sub test_map_factory { # Get the maps available my @maps = $factory->get_list(); ok(@maps >= 5, "Maps factory has the default maps"); - - # Find the OAM map and check that the it's properly described - my @found = grep { $_->{id} eq Champlain::MapSourceFactory->OAM } @maps; - is(scalar(@found), 1); - if (@found) { - my ($oam_map) = @found; - isa_ok($oam_map, 'Champlain::MapSourceDesc'); - is($oam_map->{id}, Champlain::MapSourceFactory->OAM); - is($oam_map->{name}, 'OpenAerialMap'); - is($oam_map->{license}, "(CC) BY 3.0 OpenAerialMap contributor"); - is($oam_map->{license_uri}, 'http://creativecommons.org/licenses/by/3.0/'); - is($oam_map->{min_zoom_level}, 0); - is($oam_map->{max_zoom_level}, 17); - is($oam_map->{projection}, 'mercator'); - } - else { - fail("Can't test a Champlain::MapSourceDesc without a map description") for 1 .. 8; - } } -- 2.39.5