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

link_dest_within_stow_dir: rename $path to $pkg_subpath

Browse source 
$path is horribly vague, so rename to be more informative.
This commit is contained in:
Adam Spiers 2024-04-01 16:08:56 +01:00
parent 170d161692
commit 6b9bbc9cbb
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lib/Stow.pm.in
View file

@ -1043,8 +1043,8 @@ Detect whether symlink destination is within current stow dir
=back =back
Returns C<($package, $path)> - package within the current stow dir Returns C<($package, $pkg_subpath)> - package within the current stow
and subpath within that package which the symlink points to. dir and subpath within that package which the symlink points to.
=cut =cut
@ -1063,8 +1063,8 @@ sub link_dest_within_stow_dir {
debug(4, 4, "remaining after removing $self->{stow_path}: $link_dest"); debug(4, 4, "remaining after removing $self->{stow_path}: $link_dest");
my @dirs = File::Spec->splitdir($link_dest); my @dirs = File::Spec->splitdir($link_dest);
my $package = shift @dirs; my $package = shift @dirs;
my $path = File::Spec->catdir(@dirs); my $pkg_subpath = File::Spec->catdir(@dirs);
return ($package, $path); return ($package, $pkg_subpath);
} }
=head2 find_containing_marked_stow_dir($pkg_path_from_cwd) =head2 find_containing_marked_stow_dir($pkg_path_from_cwd)