diff --git a/lib/Stow.pm.in b/lib/Stow.pm.in index 2553546..16d6bc0 100755 --- a/lib/Stow.pm.in +++ b/lib/Stow.pm.in @@ -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);