Commit 222f97c9 authored by Leigh B Stoller's avatar Leigh B Stoller

Do not allow deletion of shared vlans; must unshare it first.

parent db632522
......@@ -3493,6 +3493,9 @@ sub doDeleteVlan($@) {
if (defined($vlan) && $vlan->GetAliases()) {
die("$vlan has aliases; cannot delete before aliases\n");
if (defined($vlan) && $vlan->IsShared()) {
die("$vlan is shared; cannot delete while shared\n");
# Allow deletion by name without vlan object, by force only.
$vlans{$vlan_name} = $vlan || $vlan_name;
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