From e35faee27819db9fa807079fab9184f16eb1a1d6 Mon Sep 17 00:00:00 2001
From: Justin Hunter <justin.hunter@highwinds.com>
Date: Fri, 9 Sep 2016 14:31:22 -0700
Subject: [PATCH] add sensible fallback for native vlan

---
 Info/Layer3/Juniper.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Info/Layer3/Juniper.pm b/Info/Layer3/Juniper.pm
index 2be9ef5b..7b3fceb0 100644
--- a/Info/Layer3/Juniper.pm
+++ b/Info/Layer3/Juniper.pm
@@ -208,7 +208,7 @@ sub i_vlan {
 
     foreach my $bport ( keys %$i_pvid ) {
         my $q_vlan  = $i_pvid->{$bport};
-	my $vlan    = $v_index->{$q_vlan};
+	my $vlan    = $v_index->{$q_vlan} || $q_vlan;
         my $ifindex = $index->{$bport};
         unless ( defined $ifindex ) {
             print "  Port $bport has no bp_index mapping. Skipping.\n"