Test calling champlain_selection_layer_select twice on the smame marker

diff --git a/bindings/perl/Champlain/t/ChamplainSelectionLayer.t b/bindings/perl/Champlain/t/ChamplainSelectionLayer.t
index 9470407e5261db33297eba739d1594eaee6b50ba..1409acf3bf1c1c7ba0c715eaeeb95a29333abf6a 100644 (file)
--- a/bindings/perl/Champlain/t/ChamplainSelectionLayer.t
+++ b/bindings/perl/Champlain/t/ChamplainSelectionLayer.t
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-use Clutter::TestHelper tests => 51;
+use Clutter::TestHelper tests => 54;
 
 use Champlain;
 use Data::Dumper;
@@ -241,6 +241,10 @@ sub test_markers_single {
 
        is($layer->count_selected_markers, 1, "[single] count_selected_markers()");
 
+       # Reselect the marker once more
+       $layer->select($layer_markers[3]);
+       is($layer->get_selected, $layer_markers[3], "[single] reselected the selected marker");
+
        is_deeply(
                [ $layer->get_selected_markers ],
                [$layer_markers[3]],