try different testing
This commit is contained in:
@@ -43,7 +43,7 @@ sub setup : Tests(setup) {
|
||||
# Example walk had no sysServices returned
|
||||
#'_layers' => 1,
|
||||
'_description' => 'HiveAP121, HiveOS 6.2r1 release build1924',
|
||||
'_serial' => '12345678',
|
||||
'_ahSystemSerial' => '12345678',
|
||||
|
||||
# AH-SMI-MIB::ahProduct
|
||||
'_id' => '.1.3.6.1.4.1.26928.1',
|
||||
@@ -132,6 +132,17 @@ sub model : Tests(4) {
|
||||
is($test->{info}->model(), undef, q(No description returns undef model));
|
||||
}
|
||||
|
||||
sub serial : Tests(3) {
|
||||
my $test = shift;
|
||||
|
||||
can_ok($test->{info}, 'serial');
|
||||
is($test->{info}->serial(), '12345678', q(Serial is expected value));
|
||||
|
||||
$test->{info}->clear_cache();
|
||||
is($test->{info}->serial(), undef,
|
||||
q(No serial returns undef));
|
||||
}
|
||||
|
||||
sub i_ssidlist : Tests(3) {
|
||||
my $test = shift;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user