Commit b9df53ad authored by Leigh Stoller's avatar Leigh Stoller

Add Flush().

parent bd9613cc
#!/usr/bin/perl -wT
#
# Copyright (c) 2005-2014, 2016 University of Utah and the Flux Group.
# Copyright (c) 2005-2017 University of Utah and the Flux Group.
#
# {{{EMULAB-LICENSE
#
......@@ -301,6 +301,18 @@ sub LookupRow($$$)
return $interface;
}
sub Flush($)
{
my ($self) = @_;
my $nodeid = $self->node_id();
my $iface = $self->iface();
my $card = $self->card();
my $port = $self->port();
delete($all_interfaces{"$nodeid:$card:$port"});
delete($all_interfaces{"$nodeid:$iface"});
}
#
# Refresh instance by reloading from the DB.
#
......
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