diff options
Diffstat (limited to 'xt/cli/tree.t')
| -rw-r--r-- | xt/cli/tree.t | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/xt/cli/tree.t b/xt/cli/tree.t new file mode 100644 index 0000000..bc7ce8c --- /dev/null +++ b/xt/cli/tree.t @@ -0,0 +1,23 @@ +use strict; +use Test::More; +use xt::CLI; + +{ + my $app = cli(); + + $app->write_cpanfile(<<EOF); +requires 'HTML::Parser'; +EOF + + $app->run("install"); + $app->run("tree"); + + is $app->exit_code, 0; + like $app->stdout, qr/^HTML::Parser \(HTML-Parser-/m; + like $app->stdout, qr/^ HTML::Tagset \(HTML-Tagset-/m; +} + +done_testing; + + + |