From d90297eed1f72ece8697aca2abcaa25632f2c620 Mon Sep 17 00:00:00 2001 From: Emmanuel Rodriguez Date: Sat, 11 Jul 2009 10:46:40 +0200 Subject: [PATCH] Test calling champlain_selection_layer_select twice on the smame marker --- bindings/perl/Champlain/t/ChamplainSelectionLayer.t | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/bindings/perl/Champlain/t/ChamplainSelectionLayer.t b/bindings/perl/Champlain/t/ChamplainSelectionLayer.t index 9470407..1409acf 100644 --- 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]], -- 2.39.5