Use the map constants instead of the long names (namespaces).

diff --git a/bindings/perl/Champlain/t/ChamplainMapSource.t b/bindings/perl/Champlain/t/ChamplainMapSource.t
index 96b72ab97470e6f66fd74d285fd05c17ca9ef4d7..b6de854eeef06807f9c6f24fac01b6c52c584218 100644 (file)
--- a/bindings/perl/Champlain/t/ChamplainMapSource.t
+++ b/bindings/perl/Champlain/t/ChamplainMapSource.t
@@ -5,7 +5,7 @@ use warnings;
 
 use Clutter::TestHelper tests => 125;
 
-use Champlain ':coords';
+use Champlain qw(:coords :maps);
 
 my $OSM_LICENSE = "(CC) BY 2.0 OpenStreetMap contributors";
 
@@ -233,29 +233,29 @@ sub generic_map_operations {
 
 sub get_osm_mapnik {
        my $factory = Champlain::MapSourceFactory->get_default();
-       return $factory->create(Champlain::MapSourceFactory->OSM_MAPNIK);
+       return $factory->create(MAP_OSM_MAPNIK);
 }
 
 
 sub get_osm_cycle_map {
        my $factory = Champlain::MapSourceFactory->get_default();
-       return $factory->create(Champlain::MapSourceFactory->OSM_CYCLE_MAP);
+       return $factory->create(MAP_OSM_CYCLE_MAP);
 }
 
 
 sub get_osm_osmarender {
        my $factory = Champlain::MapSourceFactory->get_default();
-       return $factory->create(Champlain::MapSourceFactory->OSM_OSMARENDER);
+       return $factory->create(MAP_OSM_OSMARENDER);
 }
 
 
 sub get_oam {
        my $factory = Champlain::MapSourceFactory->get_default();
-       return $factory->create(Champlain::MapSourceFactory->OAM);
+       return $factory->create(MAP_OAM);
 }
 
 
 sub get_mff_relief {
        my $factory = Champlain::MapSourceFactory->get_default();
-       return $factory->create(Champlain::MapSourceFactory->MFF_RELIEF);
+       return $factory->create(MAP_MFF_RELIEF);
 }