Cover overridden layers in Layer1::Cyclades

2018-04-01 20:46:02 -04:00
parent 585d01895b
commit 3c6cfa8ecf
1 changed files with 7 additions and 0 deletions
--- a/xt/lib/Test/SNMP/Info/Layer1/Cyclades.pm
+++ b/xt/lib/Test/SNMP/Info/Layer1/Cyclades.pm
@@ -128,6 +128,13 @@ sub setup : Tests(setup) {
    $test->{info}->cache($cache_data);
 }

+sub layers : Tests(2) {
+    my $test = shift;
+
+    can_ok( $test->{info}, 'layers' );
+    is( $test->{info}->layers(), '01000001', q(Layers returns '01000001') );
+}
+
 sub os : Tests(2) {
    my $test = shift;