Skip to content

Commit 643946c

Browse files
committed
don't test long options (#439 moved to getopts)
1 parent 8ac51b1 commit 643946c

File tree

1 file changed

+2
-3
lines changed

1 file changed

+2
-3
lines changed

t/rev/rev.t

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -49,15 +49,14 @@ subtest "from stdin" => sub {
4949
subtest "version" => sub {
5050
my( $output, $error );
5151

52-
my @command = ( $^X, $command, '--version' );
52+
my @command = ( $^X, $command, '-v' );
5353
run3 \@command, undef, \$output, \$error;
5454

5555
like $output, qr/\Q$basename\E \d+\.\d+/, "shows version message";
5656
};
5757

5858
subtest "help" => sub {
59-
60-
foreach my $arg ( '-h', '--help' ) {
59+
foreach my $arg ( '-h' ) {
6160
my( $output, $error );
6261
my @command = ( $^X, $command, $arg );
6362
run3 \@command, undef, \$output, \$error;

0 commit comments

Comments
 (0)