default generate per vendor report and one for all MIBs

netdisco · Sep 14, 2017 · 8533cc0 · 8533cc0
1 parent 8c62cf2
commit 8533cc0
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/EXTRAS/scripts/genxlate b/EXTRAS/scripts/genxlate
@@ -1,6 +1,6 @@
 #!/usr/bin/env perl
 # genxlate [vendor|*] - run snmptranslate on MIBs and save output
-# no param will make a single report for all MIBs
+# no param will make a single report for all MIBs and one for each vendor
 
 use strict;
 use warnings;
@@ -34,7 +34,7 @@ if ($vendor and !exists $mibs_for->{$vendor} and $vendor ne '*') {
 }
 my @vendors = (defined $vendor)
   ? (($vendor eq '*') ? (sort keys %{$mibs_for}) : ($vendor))
-  : ('all');
+  : ((sort keys %{$mibs_for}), 'all');
 
 foreach my $v (@vendors) {
   my $mibs = ($v eq 'all') ? 'ALL' : (join ':', sort @{$mibs_for->{$v}});