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

improve debug

Browse source
This commit is contained in:
Adam Spiers 2015-01-01 19:02:26 +00:00
parent 07a84541f1
commit 5be496a795
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lib/Stow.pm.in
View file

@ -406,7 +406,7 @@ sub stow_node {
my $path = join_paths($stow_path, $package, $target); my $path = join_paths($stow_path, $package, $target);
debug(3, "Stowing $path"); debug(3, "Stowing $stow_path / $package / $target");
debug(4, " => $source"); debug(4, " => $source");
# Don't try to stow absolute symlinks (they can't be unstowed) # Don't try to stow absolute symlinks (they can't be unstowed)
@ -1582,9 +1582,11 @@ sub is_a_link {
if (my $action = $self->link_task_action($path)) { if (my $action = $self->link_task_action($path)) {
if ($action eq 'remove') { if ($action eq 'remove') {
debug(4, " is_a_link($path): returning 0 (remove action found)");
return 0; return 0;
} }
elsif ($action eq 'create') { elsif ($action eq 'create') {
debug(4, " is_a_link($path): returning 1 (create action found)");
return 1; return 1;
} }
} }
@ -1596,7 +1598,7 @@ sub is_a_link {
return $self->parent_link_scheduled_for_removal($path) ? 0 : 1; return $self->parent_link_scheduled_for_removal($path) ? 0 : 1;
} }
debug(4, " is_a_link($path): returning false"); debug(4, " is_a_link($path): returning 0");
return 0; return 0;
} }