From 6b9bbc9cbbb9e7205bb7c57b175b517d36f6ce24 Mon Sep 17 00:00:00 2001 From: Adam Spiers Date: Mon, 1 Apr 2024 16:08:56 +0100 Subject: [PATCH] link_dest_within_stow_dir: rename $path to $pkg_subpath $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 4861e51..80b1907 100755 --- a/lib/Stow.pm.in +++ b/lib/Stow.pm.in @@ -1043,8 +1043,8 @@ Detect whether symlink destination is within current stow dir =back -Returns C<($package, $path)> - package within the current stow dir -and subpath within that package which the symlink points to. +Returns C<($package, $pkg_subpath)> - package within the current stow +dir and subpath within that package which the symlink points to. =cut @@ -1063,8 +1063,8 @@ sub link_dest_within_stow_dir { debug(4, 4, "remaining after removing $self->{stow_path}: $link_dest"); my @dirs = File::Spec->splitdir($link_dest); my $package = shift @dirs; - my $path = File::Spec->catdir(@dirs); - return ($package, $path); + my $pkg_subpath = File::Spec->catdir(@dirs); + return ($package, $pkg_subpath); } =head2 find_containing_marked_stow_dir($pkg_path_from_cwd)