equal
deleted
inserted
replaced
270 foreach my $vlan (keys %$vlan_range) { |
270 foreach my $vlan (keys %$vlan_range) { |
271 $::res->{vlans}->{$vlan} = 1; |
271 $::res->{vlans}->{$vlan} = 1; |
272 } |
272 } |
273 $vlan_range = {}; |
273 $vlan_range = {}; |
274 } |
274 } |
|
275 | "vlan" "add" "vlan" vlan_range "port" port_num |
|
276 { |
|
277 foreach my $vlan (keys %$vlan_range) { |
|
278 $::res->{port}->{$item{port_num}}->{vlans}->{$vlan} = 1; |
|
279 } |
|
280 $vlan_range = {}; |
|
281 } |
|
282 | "vlan" "remove" "vlan" vlan_range "port" port_num |
|
283 { |
|
284 foreach my $vlan (keys %$vlan_range) { |
|
285 delete $::res->{port}->{$item{port_num}}->{vlans}->{$vlan}; |
|
286 } |
|
287 $vlan_range = {}; |
|
288 } |