Add the original source packages to maemo, source lenny
[dh-make-perl] / dev / i386 / libtest-simple-perl / libtest-simple-perl-0.80 / t / no_diag.t
diff --git a/dev/i386/libtest-simple-perl/libtest-simple-perl-0.80/t/no_diag.t b/dev/i386/libtest-simple-perl/libtest-simple-perl-0.80/t/no_diag.t
new file mode 100644 (file)
index 0000000..6fa538a
--- /dev/null
@@ -0,0 +1,8 @@
+#!/usr/bin/perl -w
+
+use Test::More 'no_diag', tests => 2;
+
+pass('foo');
+diag('This should not be displayed');
+
+is(Test::More->builder->no_diag, 1);