[libchamplain: 22/39] Set a defaault zoom-level for the goto tests otherwise the goto test gets stuck in Antartica
- From: Pierre-Luc Beaudoin <plbeaudoin src gnome org>
- To: svn-commits-list gnome org
- Cc:
- Subject: [libchamplain: 22/39] Set a defaault zoom-level for the goto tests otherwise the goto test gets stuck in Antartica
- Date: Mon, 21 Sep 2009 16:25:34 +0000 (UTC)
commit 9dbd4a9e81cebc527fcc9cbda507bca4fe127c2c
Author: Emmanuel Rodriguez <emmanuel rodriguez gmail com>
Date: Thu Sep 17 20:28:30 2009 +0200
Set a defaault zoom-level for the goto tests otherwise the goto test gets stuck in Antartica
bindings/perl/Champlain/t/ChamplainView.t | 16 +++++++++-------
1 files changed, 9 insertions(+), 7 deletions(-)
---
diff --git a/bindings/perl/Champlain/t/ChamplainView.t b/bindings/perl/Champlain/t/ChamplainView.t
index 223c8f3..b3513ed 100644
--- a/bindings/perl/Champlain/t/ChamplainView.t
+++ b/bindings/perl/Champlain/t/ChamplainView.t
@@ -270,13 +270,11 @@ sub test_go_to {
# Go to a different place
my ($latitude, $longitude) = (48.218611, 17.146397);
$view->go_to($latitude, $longitude);
-
run_animation_loop($view);
# Check if we got somewhere close to desired location
is_view_near($view, $latitude, $longitude);
-
# Replace the view in the center
$view->center_on(0, 0);
is($view->get('latitude'), 0, "center_on() reset latitude");
@@ -336,7 +334,6 @@ sub test_ensure_visible {
my (@marker1) = (48.218611, 17.146397);
my (@marker2) = (48.21066, 16.31476);
$view->ensure_visible(@marker1, @marker2, TRUE);
-
run_animation_loop($view);
# Check if we got somewhere close to the middle of the markers
@@ -379,7 +376,6 @@ sub test_ensure_markers_visible {
$view->set_size(400, 400);
$view->ensure_markers_visible(\ markers, TRUE);
-
run_animation_loop($view);
# Check if we got somewhere close to the middle of the markers
@@ -421,9 +417,15 @@ sub create_marker {
sub run_animation_loop {
my ($view) = @_;
-# if (my $stage = $view->get_stage) {
-# $stage->show_all();
-# }
+ # Set a proper zoom-level otherwise the test will fail because we would be
+ # zoomed in Antartica.
+ $view->set_property("zoom-level", 4);
+# if (!$view->get_stage) {
+# my $stage = Clutter::Stage->get_default();
+# $stage->add($view);
+# $stage->set_size(400, 400);
+# #$stage->show_all();
+# }
# Give us a bit of time to get there since this is an animation and it
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]