Add the following packages libalgorithm-diff-perl libspiffy-perl libtext-diff-perl...

[pkg-perl] / deb-src / libtest-base-perl / libtest-base-perl-0.54 / t / lazy-filters.t

diff --git a/deb-src/libtest-base-perl/libtest-base-perl-0.54/t/lazy-filters.t b/deb-src/libtest-base-perl/libtest-base-perl-0.54/t/lazy-filters.t
new file mode 100644 (file)
index 0000000..cf6fa10
--- /dev/null
+++ b/deb-src/libtest-base-perl/libtest-base-perl-0.54/t/lazy-filters.t
@@ -0,0 +1,24 @@
+use Test::Base tests => 2;
+no_diag_on_only;
+sub shouldnt_be_run {
+    fail "shouldnt_be_run was run";
+}
+
+run_is foo => 'bar';
+
+my ($block) = blocks;
+is($block->foo, "1234");
+
+__DATA__
+===
+--- foo shouldnt_be_run
+--- bar
+
+
+
+===
+--- ONLY
+--- foo chomp
+1234
+--- bar chomp
+1234