Map names use '-' as a separator instead of '::'

diff --git a/bindings/perl/Champlain/t/ChamplainMapSource.t b/bindings/perl/Champlain/t/ChamplainMapSource.t
index 80ba25ee9a1aa7d4f410cb43d1e5de0173d7c11f..13dc8f8336cc561d03fd6566c8ceefd8fff87dd4 100644 (file)
--- a/bindings/perl/Champlain/t/ChamplainMapSource.t
+++ b/bindings/perl/Champlain/t/ChamplainMapSource.t
@@ -28,7 +28,7 @@ sub test_osm_mapnik {
        isa_ok($map, 'Champlain::MapSource');
        
        # Map identification
-       is($map->get_id, 'osm::mapnik', "$label id");
+       is($map->get_id, 'osm-mapnik', "$label id");
        is($map->get_name, 'OpenStreetMap Mapnik', "$label name");
        is($map->get_min_zoom_level, 0, "$label min zoom");
        is($map->get_max_zoom_level, 18, "$label max zoom");
@@ -48,7 +48,7 @@ sub test_osm_cyclemap {
        isa_ok($map, 'Champlain::MapSource');
        
        # Map identification
-       is($map->get_id, 'osm::cyclemap', "$label id");
+       is($map->get_id, 'osm-cyclemap', "$label id");
        is($map->get_name, 'OpenStreetMap Cycle Map', "$label name");
        is($map->get_min_zoom_level, 0, "$label min zoom");
        is($map->get_max_zoom_level, 18, "$label max zoom");
@@ -68,7 +68,7 @@ sub test_osm_osmarender {
        isa_ok($map, 'Champlain::MapSource');
        
        # Map identification
-       is($map->get_id, 'osm::osmarender', "$label id");
+       is($map->get_id, 'osm-osmarender', "$label id");
        is($map->get_name, 'OpenStreetMap Osmarender', "$label name");
        is($map->get_min_zoom_level, 0, "$label min zoom");
        is($map->get_max_zoom_level, 18, "$label max zoom");
@@ -108,7 +108,7 @@ sub test_mff_relief {
        isa_ok($map, 'Champlain::MapSource');
        
        # Map identification
-       is($map->get_id, 'mff::relief', "$label id");
+       is($map->get_id, 'mff-relief', "$label id");
        is($map->get_name, 'Maps for Free Relief', "$label name");
        is($map->get_min_zoom_level, 0, "$label min zoom");
        is($map->get_max_zoom_level, 11, "$label max zoom");
@@ -133,8 +133,8 @@ sub generic_map_operations {
        # Rename of the map
        $map->set_name("No name");
        is($map->get_name, "No name", "Rename the map");
-       $map->set_id('test::map');
-       is($map->get_id, 'test::map', "Change the map id");
+       $map->set_id('test-map');
+       is($map->get_id, 'test-map', "Change the map id");
        
        
        # Relicense the map