diff options
Diffstat (limited to 'xt/lib/Test/SNMP')
| -rw-r--r-- | xt/lib/Test/SNMP/Info/Layer2/Aerohive.pm | 13 | 
1 files changed, 12 insertions, 1 deletions
| diff --git a/xt/lib/Test/SNMP/Info/Layer2/Aerohive.pm b/xt/lib/Test/SNMP/Info/Layer2/Aerohive.pm index 658d7884..0bbb2ee7 100644 --- a/xt/lib/Test/SNMP/Info/Layer2/Aerohive.pm +++ b/xt/lib/Test/SNMP/Info/Layer2/Aerohive.pm @@ -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; | 
