From 0daf352200dd1694fec772c30b0453d25a002501 Mon Sep 17 00:00:00 2001 From: Adam Spiers Date: Mon, 1 Apr 2024 16:16:52 +0100 Subject: [PATCH] unstow_node: rename $path to $pkg_path_from_cwd $path is horribly vague, so rename to be more informative. --- lib/Stow.pm.in | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lib/Stow.pm.in b/lib/Stow.pm.in index 80b1907..0228483 100755 --- a/lib/Stow.pm.in +++ b/lib/Stow.pm.in @@ -789,17 +789,17 @@ sub unstow_node { my $self = shift; my ($package, $target_subpath, $source) = @_; - my $path = join_paths($self->{stow_path}, $package, $target_subpath); + my $pkg_path_from_cwd = join_paths($self->{stow_path}, $package, $target_subpath); - debug(3, 1, "Unstowing $path"); + debug(3, 1, "Unstowing $pkg_path_from_cwd"); debug(4, 2, "target is $target_subpath"); # Does the target exist? if ($self->is_a_link($target_subpath)) { - $self->unstow_link_node($package, $target_subpath, $path); + $self->unstow_link_node($package, $target_subpath, $pkg_path_from_cwd); } elsif ($self->{compat} && -d $target_subpath) { - $self->unstow_contents($package, $target_subpath, $path); + $self->unstow_contents($package, $target_subpath, $pkg_path_from_cwd); # This action may have made the parent directory foldable if (my $parent = $self->foldable($target_subpath)) {