aboutsummaryrefslogtreecommitdiff
path: root/lib/App/Beam/Backup.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/App/Beam/Backup.pm')
-rw-r--r--lib/App/Beam/Backup.pm15
1 files changed, 3 insertions, 12 deletions
diff --git a/lib/App/Beam/Backup.pm b/lib/App/Beam/Backup.pm
index ed8953b..c2da254 100644
--- a/lib/App/Beam/Backup.pm
+++ b/lib/App/Beam/Backup.pm
@@ -42,22 +42,13 @@ sub run {
my $self = shift;
#GetOptionsFromArray(\@_, ...);
- my @items = split /\s+/, $self->get('core.items');
- if (@_) {
- push @items, $self->names_of('item');
- foreach my $item (@_) {
- $self->abend(EX_USAGE, "$item: no such item defined")
- unless grep { $item eq $_ } @items;
- }
- @items = @_;
- }
+ my @items = $self->check_items(@_);
- $self->lock();
foreach my $item (@items) {
my $backend = $self->{backend}{$self->get("item.$item.backend")};
- $backend->backup($item);
+ $self->{history}->top->begin_entry($item);
+ $self->{history}->top->finish_entry($item, $backend->backup($item));
}
- $self->unlock();
}
1;

Return to:

Send suggestions and report system problems to the System administrator.