[libchamplain/libchamplain-0-4] Improve the SYNOPSIS

[Pierre-Luc Beaudoin <plbeaudoin src gnome org>]

commit 9fedf5ce518553d8af05054d881c214c1f05ffcd
Author: Emmanuel Rodriguez <emmanuel rodriguez gmail com>
Date:   Tue Nov 3 06:25:03 2009 +0100

    Improve the SYNOPSIS

 bindings/perl/Gtk2-Champlain/lib/Gtk2/Champlain.pm |   13 ++++---------
 1 files changed, 4 insertions(+), 9 deletions(-)
---
diff --git a/bindings/perl/Gtk2-Champlain/lib/Gtk2/Champlain.pm b/bindings/perl/Gtk2-Champlain/lib/Gtk2/Champlain.pm
index 3235bf3..a5adeda 100644
--- a/bindings/perl/Gtk2-Champlain/lib/Gtk2/Champlain.pm
+++ b/bindings/perl/Gtk2-Champlain/lib/Gtk2/Champlain.pm
@@ -12,24 +12,19 @@ Gtk2::Champlain - Gtk2 map rendering widget
 	my $window = Gtk2::Window->new('toplevel');
 	$window->signal_connect(destroy => sub { Gtk2->main_quit(); });
 	$window->set_title('Free maps');
+	$window->set_default_size(800, 600);
 	
-	# Standard clutter canvas
+	# Embeddable map widget
 	my $embed = Gtk2::Champlain::Embed->new();
-	
-	my $stage = Clutter::Stage->get_default();
-	$stage->set_size(800, 600);
+	$window->add($embed);
 	
 	# Configure the map view
 	my $map = $embed->get_view();
-	$map->set_size($stage->get_size);
 	$map->set_zoom_level(7);
 	$map->center_on(45.466, -73.75);
 	
-	# Pack the widgets
-	$window->add($embed);
+	# Show all widgets and start the main loop
 	$window->show_all();
-	
-	# Main loop
 	Gtk2->main();
 
 =head1 DESCRIPTION