Refactor tests (second pass)

[html-element-library.git] / t / dual_iter.t

diff --git a/t/dual_iter.t b/t/dual_iter.t
deleted file mode 100644 (file)
index 2c93fd4..0000000
--- a/t/dual_iter.t
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/usr/bin/perl
-use t::lib tests => 1;
-
-my $tree = mktree 't/html/dual_iter.html';
-
-$tree->iter2(
-       wrapper_data => [
-               ['the pros' => 'never have to worry about service again'],
-               ['the cons' => 'upfront extra charge on purchase'],
-               ['our choice' => 'go with the extended service plan']
-       ],
-       wrapper_proc => sub {
-               my ($container) = @_;
-               # only keep the last 2 dts and dds
-               my @content_list = $container->content_list;
-               $container->splice_content(0, @content_list - 2);
-       },
-       splice       => sub {
-               my ($container, @item_elems) = @_;
-               $container->unshift_content(@item_elems);
-       },
-       debug        => $ENV{TEST_VERBOSE},
-);
-
-isxml $tree, 't/html/dual_iter.exp', 'dual_iter';