Skip unnecessary planning
This commit is contained in:
parent
c0c01a6c61
commit
e76dda400a
1 changed files with 8 additions and 0 deletions
|
@ -265,6 +265,10 @@ sub plan_unstow {
|
|||
my $self = shift;
|
||||
my @packages = @_;
|
||||
|
||||
return unless @packages;
|
||||
|
||||
debug(2, 0, "Planning unstow of: @packages ...");
|
||||
|
||||
$self->within_target_do(sub {
|
||||
for my $package (@packages) {
|
||||
my $path = join_paths($self->{stow_path}, $package);
|
||||
|
@ -304,6 +308,10 @@ sub plan_stow {
|
|||
my $self = shift;
|
||||
my @packages = @_;
|
||||
|
||||
return unless @packages;
|
||||
|
||||
debug(2, 0, "Planning stow of: @packages ...");
|
||||
|
||||
$self->within_target_do(sub {
|
||||
for my $package (@packages) {
|
||||
my $path = join_paths($self->{stow_path}, $package);
|
||||
|
|
Loading…
Reference in a new issue