Skip unnecessary planning

This commit is contained in:
Adam Spiers 2020-11-11 18:19:43 +00:00
parent c0c01a6c61
commit e76dda400a

View file

@ -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);