~ubuntu-branches/ubuntu/wily/libapp-cmd-perl/wily-proposed

Viewing changes to t/basic.t

Tags: 0.327-1

[ upstream ]
New release(s).

added added

removed removed

}

my $return = test_app('Test::MyCmd', [ qw(--version) ]);

my $version_expect = "basic.t (Test::MyCmd) version 0.123 (t/basic.t)\n";

is($return->stdout, $version_expect, "version plugin enabled");

like(

$return->stdout,

qr{\Abasic\.t $Test::MyCmd$ version 0\.123 $t[\\/]basic\.t$\Z},

"version plugin enabled"

);

$return = test_app('Test::MyCmd', [ qw(commands) ]);