From 651e19fdbd6b1bc84a511dd0f22b2eea476c4148 Mon Sep 17 00:00:00 2001 From: Emmanuel Rodriguez Date: Tue, 17 Mar 2009 17:46:45 +0100 Subject: [PATCH] Unit tests for Champlain::Layer --- bindings/perl/Champlain/MANIFEST | 1 + bindings/perl/Champlain/t/ChamplainLayer.t | 16 ++++++++++++++++ 2 files changed, 17 insertions(+) create mode 100644 bindings/perl/Champlain/t/ChamplainLayer.t diff --git a/bindings/perl/Champlain/MANIFEST b/bindings/perl/Champlain/MANIFEST index a7b1cbe..8c53084 100644 --- a/bindings/perl/Champlain/MANIFEST +++ b/bindings/perl/Champlain/MANIFEST @@ -16,5 +16,6 @@ xs/ChamplainTile.xs xs/ChamplainView.xs xs/Gtk2ChamplainViewEmbed.xs t/Champlain.t +t/ChamplainLayer.t examples/launcher.pl examples/gtk2.pl diff --git a/bindings/perl/Champlain/t/ChamplainLayer.t b/bindings/perl/Champlain/t/ChamplainLayer.t new file mode 100644 index 0000000..d8cb352 --- /dev/null +++ b/bindings/perl/Champlain/t/ChamplainLayer.t @@ -0,0 +1,16 @@ +#!/usr/bin/perl + +use strict; +use warnings; + +use Clutter::TestHelper tests => 1; + +use Champlain; + +exit tests(); + +sub tests { + my $layer = Champlain::Layer->new(); + isa_ok($layer, 'Champlain::Layer'); + return 0; +} -- 2.39.5