Basic functionality of the Parts tab is complete

This commit is contained in:
Alessandro Ranellucci 2014-01-22 21:09:32 +01:00
parent 7387e60706
commit b5b8fb606f
4 changed files with 69 additions and 17 deletions

View file

@ -351,6 +351,11 @@ sub add_volume {
return $new_volume;
}
sub delete_volume {
my ($self, $i) = @_;
splice @{$self->volumes}, $i, 1;
}
sub add_instance {
my $self = shift;
my %params = @_;