[libchamplain/libchamplain-0-4] Perl bindings for champlain_marker_queue_redraw

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

commit 03635c016194db19a3e029d9e579b7c40520d9b3
Author: Emmanuel Rodriguez <emmanuel rodriguez gmail com>
Date:   Sat Jan 9 09:34:39 2010 +0100

    Perl bindings for champlain_marker_queue_redraw

 bindings/perl/Champlain/t/ChamplainMarker.t   |    8 ++++++++
 bindings/perl/Champlain/xs/ChamplainMarker.xs |    8 ++++++++
 2 files changed, 16 insertions(+), 0 deletions(-)
---
diff --git a/bindings/perl/Champlain/t/ChamplainMarker.t b/bindings/perl/Champlain/t/ChamplainMarker.t
index cae9963..2a38175 100644
--- a/bindings/perl/Champlain/t/ChamplainMarker.t
+++ b/bindings/perl/Champlain/t/ChamplainMarker.t
@@ -21,6 +21,7 @@ exit tests();
 
 
 sub tests {
+
 	test_new();
 	test_new_with_text();
 	test_new_from_file();
@@ -211,6 +212,13 @@ sub generic_test {
 	is($marker->get_font_name, "Mono 14", "set_font_name()");
 	$marker->set_font_name(undef);
 	is($marker->get_font_name, $DEFAULT_FONT_NAME, "set_font_name(undef)");
+
+
+	# Can't be tested but at least we call it
+	SKIP: {
+		Champlain->CHECK_VERSION(0, 4, 3) or skip '0.4.3 stuff', 0;
+		$marker->queue_redraw();
+	}
 }
 
 
diff --git a/bindings/perl/Champlain/xs/ChamplainMarker.xs b/bindings/perl/Champlain/xs/ChamplainMarker.xs
index 54239b6..43dfaa6 100644
--- a/bindings/perl/Champlain/xs/ChamplainMarker.xs
+++ b/bindings/perl/Champlain/xs/ChamplainMarker.xs
@@ -160,3 +160,11 @@ champlain_marker_get_highlight_text_color (class)
 	C_ARGS:  /* No args */
 
 #endif /* 0.4.1 */
+
+
+#if CHAMPLAIN_CHECK_VERSION (0, 4, 3)
+
+void
+champlain_marker_queue_redraw (ChamplainMarker *marker)
+
+#endif /* 0.4.3 */