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

Be clearer when we're not actually (un)stowing, just planning.

Browse source
This commit is contained in:
Adam Spiers 2011-11-22 15:46:05 +00:00
parent 8960a4f1fb
commit 7c0bb53bff
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

@ -232,7 +232,7 @@ sub plan_unstow {
if (not -d join_paths($self->{stow_path}, $package)) { if (not -d join_paths($self->{stow_path}, $package)) {
error("The given package name ($package) is not in your stow path $self->{stow_path}"); error("The given package name ($package) is not in your stow path $self->{stow_path}");
} }
debug(2, "Unstowing package $package..."); debug(2, "Planning unstow of package $package...");
if ($self->{'compat'}) { if ($self->{'compat'}) {
$self->unstow_contents_orig( $self->unstow_contents_orig(
join_paths($self->{stow_path}, $package), # path to package join_paths($self->{stow_path}, $package), # path to package
@ -245,7 +245,7 @@ sub plan_unstow {
'.', # target is current_dir '.', # target is current_dir
); );
} }
debug(2, "Unstowing package $package... done"); debug(2, "Planning unstow of package $package... done");
} }
}); });
} }
@ -267,13 +267,13 @@ sub plan_stow {
if (not -d join_paths($self->{stow_path}, $package)) { if (not -d join_paths($self->{stow_path}, $package)) {
error("The given package name ($package) is not in your stow path $self->{stow_path}"); error("The given package name ($package) is not in your stow path $self->{stow_path}");
} }
debug(2, "Stowing package $package..."); debug(2, "Planning stow of package $package...");
$self->stow_contents( $self->stow_contents(
join_paths($self->{stow_path}, $package), # path package join_paths($self->{stow_path}, $package), # path package
'.', # target is current dir '.', # target is current dir
join_paths($self->{stow_path}, $package), # source from target join_paths($self->{stow_path}, $package), # source from target
); );
debug(2, "Stowing package $package... done"); debug(2, "Planning stow of package $package... done");
} }
}); });
} }