Implement the functions champlain_layer_animate_*()

diff --git a/bindings/perl/Champlain/t/ChamplainLayer.t b/bindings/perl/Champlain/t/ChamplainLayer.t
index 1831914b46661e2bbae7f055ac4f663f2802ffc8..c1ae40ab4439a9212faab66dc28ea6a616a6cc1b 100644 (file)
--- a/bindings/perl/Champlain/t/ChamplainLayer.t
+++ b/bindings/perl/Champlain/t/ChamplainLayer.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Clutter::TestHelper tests => 6;
+use Clutter::TestHelper tests => 9;
 
 use Champlain;
 
@@ -32,5 +32,17 @@ sub tests {
        $layer->hide();
        ok(!$layer->get('visible'), "hide()");
 
+       # Too hard to test, but at least we call them
+       $layer->animate_in_all_markers();
+       $layer->animate_out_all_markers();
+
+       # Show/Hide the markers
+       ok($marker->get('visible'), "marker is not visible");
+       $layer->hide_all_markers();
+       ok(!$marker->get('visible'), "hide_all_markers()");
+
+
+       $layer->show_all_markers();
+       ok($marker->get('visible'), "show_all_markers()");
        return 0;
 }

diff --git a/bindings/perl/Champlain/xs/ChamplainLayer.xs b/bindings/perl/Champlain/xs/ChamplainLayer.xs
index 4f6915c787a488f7463275d4d8f19e28977966ec..626a993f47a1779f7a23245c60bcad898d2df258 100644 (file)
--- a/bindings/perl/Champlain/xs/ChamplainLayer.xs
+++ b/bindings/perl/Champlain/xs/ChamplainLayer.xs
@@ -23,3 +23,19 @@ champlain_layer_show (ChamplainLayer *layer)
 
 void
 champlain_layer_remove_marker (ChamplainLayer *layer, ChamplainBaseMarker *marker)
+
+
+void
+champlain_layer_animate_in_all_markers (ChamplainLayer *layer)
+
+
+void
+champlain_layer_animate_out_all_markers (ChamplainLayer *layer)
+
+
+void
+champlain_layer_hide_all_markers (ChamplainLayer *layer)
+
+
+void
+champlain_layer_show_all_markers (ChamplainLayer *layer)