Correct test descriptions

This commit is contained in:
Eric A. Miller
2018-04-11 19:56:36 -04:00
parent aceed9cc52
commit d13adfee80
19 changed files with 19 additions and 19 deletions

View File

@@ -73,7 +73,7 @@ sub os : Tests(2) {
my $test = shift;
can_ok($test->{info}, 'os');
is($test->{info}->os(), 'allied', q(Vendor returns 'allied'));
is($test->{info}->os(), 'allied', q(OS returns 'allied'));
}
sub os_ver : Tests(3) {

View File

@@ -67,7 +67,7 @@ sub os : Tests(2) {
my $test = shift;
can_ok($test->{info}, 'os');
is($test->{info}->os(), 'bay_hub', q(Vendor returns 'bay_hub'));
is($test->{info}->os(), 'bay_hub', q(OS returns 'bay_hub'));
}
sub vendor : Tests(2) {

View File

@@ -139,7 +139,7 @@ sub os : Tests(2) {
my $test = shift;
can_ok( $test->{info}, 'os' );
is( $test->{info}->os(), 'avocent', q(Vendor returns 'avocent') );
is( $test->{info}->os(), 'avocent', q(OS returns 'avocent') );
}
sub os_ver : Tests(6) {

View File

@@ -66,7 +66,7 @@ sub os : Tests(2) {
my $test = shift;
can_ok($test->{info}, 'os');
is($test->{info}->os(), 'synoptics', q(Vendor returns 'synoptics'));
is($test->{info}->os(), 'synoptics', q(OS returns 'synoptics'));
}
sub vendor : Tests(2) {