00dani/stow
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Skip unnecessary planning

Browse source
This commit is contained in:
Adam Spiers 2020-11-11 18:19:43 +00:00
parent c0c01a6c61
commit e76dda400a
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lib/Stow.pm.in
View file

@ -265,6 +265,10 @@ sub plan_unstow {
my $self = shift; my $self = shift;
my @packages = @_; my @packages = @_;
return unless @packages;
debug(2, 0, "Planning unstow of: @packages ...");
$self->within_target_do(sub { $self->within_target_do(sub {
for my $package (@packages) { for my $package (@packages) {
my $path = join_paths($self->{stow_path}, $package); my $path = join_paths($self->{stow_path}, $package);
@ -304,6 +308,10 @@ sub plan_stow {
my $self = shift; my $self = shift;
my @packages = @_; my @packages = @_;
return unless @packages;
debug(2, 0, "Planning stow of: @packages ...");
$self->within_target_do(sub { $self->within_target_do(sub {
for my $package (@packages) { for my $package (@packages) {
my $path = join_paths($self->{stow_path}, $package); my $path = join_paths($self->{stow_path}, $package);