All new accounts created on Gitlab now require administrator approval. If you invite any collaborators, please let Flux staff know so they can approve the accounts.

Commit ded8d816 authored by Leigh B. Stoller's avatar Leigh B. Stoller

Minor change to previous revision.

parent 9a23a669
......@@ -20,6 +20,7 @@ sub usage()
}
my $optlist = "dnp:e:";
my $debug = 1;
my $dlevel = 1;
my $impotent = 0;
my $exitval = 0;
my $output;
......@@ -476,7 +477,7 @@ sub SetupVlans($)
}
# Not doing stacks yet.
my $stackopt = "";
my $debugopt = ($debug ? "-v" : "");
my $debugopt = ($debug ? "-v $dlevel" : "");
# Now call snmpit to create the actual vlans.
if ($debug) {
......@@ -610,7 +611,7 @@ sub DestroyVlans($)
my $stack = $vlan->GetStack();
# Not doing stacks yet;
my $stackopt = "";
my $debugopt = ($debug ? "-v" : "");
my $debugopt = ($debug ? "-v $dlevel" : "");
if ($debug) {
print STDERR "Running 'snmpit $stackopt -r $pid $eid $outer_id'\n";
......@@ -725,7 +726,7 @@ sub Trunk($)
fatal("Trunk: Improper stack argument: $stack");
}
}
my $debugopt = ($debug ? "-v" : "");
my $debugopt = ($debug ? "-v $dlevel" : "");
$port =~ /^(.+):(.+)/;
my ($node, $card) = ($1,$2);
......@@ -833,7 +834,7 @@ sub PortControl($)
# Not doing stacks yet;
my $stack = "Experimental";
my $debugopt = ($debug ? "-v" : "");
my $debugopt = ($debug ? "-v $dlevel" : "");
#
# Check the ports. Must be valid format and belong to node reserved
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment