[libchamplain/libchamplain-0-4] Perl bindings for champlain_polygon_set_mark_points and champlain_polygon_get_mark_points
- From: Pierre-Luc Beaudoin <plbeaudoin src gnome org>
- To: svn-commits-list gnome org
- Cc:
- Subject: [libchamplain/libchamplain-0-4] Perl bindings for champlain_polygon_set_mark_points and champlain_polygon_get_mark_points
- Date: Sat, 9 Jan 2010 19:57:36 +0000 (UTC)
commit 8fa20aadd5c79e92d538c289b9949b33c244bac2
Author: Emmanuel Rodriguez <emmanuel rodriguez gmail com>
Date: Sat Jan 9 09:42:31 2010 +0100
Perl bindings for champlain_polygon_set_mark_points and champlain_polygon_get_mark_points
bindings/perl/Champlain/t/ChamplainPolygon.t | 11 ++++++++++-
bindings/perl/Champlain/xs/ChamplainPolygon.xs | 12 ++++++++++++
2 files changed, 22 insertions(+), 1 deletions(-)
---
diff --git a/bindings/perl/Champlain/t/ChamplainPolygon.t b/bindings/perl/Champlain/t/ChamplainPolygon.t
index 28b6216..8d89192 100644
--- a/bindings/perl/Champlain/t/ChamplainPolygon.t
+++ b/bindings/perl/Champlain/t/ChamplainPolygon.t
@@ -3,7 +3,7 @@
use strict;
use warnings;
-use Clutter::TestHelper tests => 50;
+use Clutter::TestHelper tests => 52;
use Champlain;
@@ -43,6 +43,15 @@ sub test_empty {
# These fields have no accessor yet
ok(!$polygon->get('closed-path'), "closed-path is unset on a new polygon");
ok($polygon->get('visible'), "closed-path is set on a new polygon");
+
+ SKIP: {
+ Champlain->CHECK_VERSION(0, 4, 3) or skip '0.4.3 stuff', 2;
+ $polygon->set_mark_points(TRUE);
+ is($polygon->get_mark_points, TRUE, "set_mark_points(TRUE)");
+
+ $polygon->set_mark_points(FALSE);
+ is($polygon->get_mark_points, FALSE, "set_mark_points(FALSE)");
+ }
}
diff --git a/bindings/perl/Champlain/xs/ChamplainPolygon.xs b/bindings/perl/Champlain/xs/ChamplainPolygon.xs
index 4b81e33..a84f411 100644
--- a/bindings/perl/Champlain/xs/ChamplainPolygon.xs
+++ b/bindings/perl/Champlain/xs/ChamplainPolygon.xs
@@ -91,3 +91,15 @@ champlain_polygon_hide (ChamplainPolygon *polygon)
void
champlain_polygon_remove_point (ChamplainPolygon *self, ChamplainPoint *point)
+
+
+#if CHAMPLAIN_CHECK_VERSION (0, 4, 3)
+
+void
+champlain_polygon_set_mark_points (ChamplainPolygon *polygon, gboolean value)
+
+
+gboolean
+champlain_polygon_get_mark_points (ChamplainPolygon *polygon)
+
+#endif /* 0.4.3 */
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]