Add the original source packages to maemo, source lenny
[dh-make-perl] / dev / i386 / libtest-pod-perl / libtest-pod-perl-1.26 / t / good.t
diff --git a/dev/i386/libtest-pod-perl/libtest-pod-perl-1.26/t/good.t b/dev/i386/libtest-pod-perl/libtest-pod-perl-1.26/t/good.t
new file mode 100644 (file)
index 0000000..60e32bd
--- /dev/null
@@ -0,0 +1,24 @@
+#!perl -T
+
+use strict;
+
+use Test::Builder::Tester tests => 3;
+use Test::More;
+
+BEGIN {
+    use_ok( 'Test::Pod' );
+}
+
+
+my $filename = "t/pod/good.pod";
+GOOD: {
+    test_out( "ok 1 - Blargo!" );
+    pod_file_ok( $filename, "Blargo!" );
+    test_test( 'Handles good.pod OK' );
+}
+
+DEFAULT_NAME: {
+    test_out( "ok 1 - POD test for t/pod/good.pod" );
+    pod_file_ok( $filename );
+    test_test( 'Handles good.pod OK, and builds default name OK' );
+}