Remove trailing whitespace
This commit is contained in:
parent
a426a5979d
commit
cb4b0c6a9a
2 changed files with 11 additions and 11 deletions
|
@ -186,7 +186,7 @@ sub parent {
|
||||||
my $path = join '/', @_;
|
my $path = join '/', @_;
|
||||||
my @elts = split m{/+}, $path;
|
my @elts = split m{/+}, $path;
|
||||||
pop @elts;
|
pop @elts;
|
||||||
return join '/', @elts;
|
return join '/', @elts;
|
||||||
}
|
}
|
||||||
|
|
||||||
#===== METHOD ===============================================================
|
#===== METHOD ===============================================================
|
||||||
|
|
|
@ -40,7 +40,7 @@ my %conflicts;
|
||||||
|
|
||||||
#
|
#
|
||||||
# unstow a simple tree minimally
|
# unstow a simple tree minimally
|
||||||
#
|
#
|
||||||
|
|
||||||
$stow = new_compat_Stow();
|
$stow = new_compat_Stow();
|
||||||
|
|
||||||
|
@ -53,7 +53,7 @@ $stow->process_tasks();
|
||||||
ok(
|
ok(
|
||||||
$stow->get_conflict_count == 0 &&
|
$stow->get_conflict_count == 0 &&
|
||||||
-f '../stow/pkg1/bin1/file1' && ! -e 'bin1'
|
-f '../stow/pkg1/bin1/file1' && ! -e 'bin1'
|
||||||
=> 'unstow a simple tree'
|
=> 'unstow a simple tree'
|
||||||
);
|
);
|
||||||
|
|
||||||
#
|
#
|
||||||
|
@ -70,7 +70,7 @@ $stow->process_tasks();
|
||||||
ok(
|
ok(
|
||||||
$stow->get_conflict_count == 0 &&
|
$stow->get_conflict_count == 0 &&
|
||||||
-f '../stow/pkg2/lib2/file2' && -d 'lib2'
|
-f '../stow/pkg2/lib2/file2' && -d 'lib2'
|
||||||
=> 'unstow simple tree from a pre-existing directory'
|
=> 'unstow simple tree from a pre-existing directory'
|
||||||
);
|
);
|
||||||
|
|
||||||
#
|
#
|
||||||
|
@ -89,10 +89,10 @@ make_file('../stow/pkg3b/bin3/file3b');
|
||||||
make_link('bin3/file3b' => '../../stow/pkg3b/bin3/file3b'); # emulate stow
|
make_link('bin3/file3b' => '../../stow/pkg3b/bin3/file3b'); # emulate stow
|
||||||
$stow->plan_unstow('pkg3b');
|
$stow->plan_unstow('pkg3b');
|
||||||
$stow->process_tasks();
|
$stow->process_tasks();
|
||||||
ok(
|
ok(
|
||||||
$stow->get_conflict_count == 0 &&
|
$stow->get_conflict_count == 0 &&
|
||||||
-l 'bin3' &&
|
-l 'bin3' &&
|
||||||
readlink('bin3') eq '../stow/pkg3a/bin3'
|
readlink('bin3') eq '../stow/pkg3a/bin3'
|
||||||
=> 'fold tree after unstowing'
|
=> 'fold tree after unstowing'
|
||||||
);
|
);
|
||||||
|
|
||||||
|
@ -235,7 +235,7 @@ make_file('../stow/pkg9b/man9/man1/file9.1');
|
||||||
capture_stderr();
|
capture_stderr();
|
||||||
$stow->plan_unstow('pkg9b');
|
$stow->plan_unstow('pkg9b');
|
||||||
$stow->process_tasks();
|
$stow->process_tasks();
|
||||||
ok(
|
ok(
|
||||||
$stow->get_conflict_count == 0 &&
|
$stow->get_conflict_count == 0 &&
|
||||||
!-l 'man9/man1/file9.1'
|
!-l 'man9/man1/file9.1'
|
||||||
=> 'overriding existing documentation files'
|
=> 'overriding existing documentation files'
|
||||||
|
@ -263,9 +263,9 @@ make_file('../stow/pkg10c/man10/man1/file10a.1');
|
||||||
capture_stderr();
|
capture_stderr();
|
||||||
$stow->plan_unstow('pkg10c');
|
$stow->plan_unstow('pkg10c');
|
||||||
is($stow->get_tasks, 0, 'no tasks to process when unstowing pkg10c');
|
is($stow->get_tasks, 0, 'no tasks to process when unstowing pkg10c');
|
||||||
ok(
|
ok(
|
||||||
$stow->get_conflict_count == 0 &&
|
$stow->get_conflict_count == 0 &&
|
||||||
readlink('man10/man1/file10a.1') eq '../../../stow/pkg10a/man10/man1/file10a.1'
|
readlink('man10/man1/file10a.1') eq '../../../stow/pkg10a/man10/man1/file10a.1'
|
||||||
=> 'defer to existing documentation files'
|
=> 'defer to existing documentation files'
|
||||||
);
|
);
|
||||||
check_protected_dirs_skipped();
|
check_protected_dirs_skipped();
|
||||||
|
@ -285,7 +285,7 @@ make_link('man12/man1/file12.1' => '../../../stow/pkg12/man12/man1/file12.1');
|
||||||
capture_stderr();
|
capture_stderr();
|
||||||
$stow->plan_unstow('pkg12');
|
$stow->plan_unstow('pkg12');
|
||||||
$stow->process_tasks();
|
$stow->process_tasks();
|
||||||
ok(
|
ok(
|
||||||
$stow->get_conflict_count == 0 &&
|
$stow->get_conflict_count == 0 &&
|
||||||
!-e 'man12/man1/file12.1'
|
!-e 'man12/man1/file12.1'
|
||||||
=> 'ignore temp files'
|
=> 'ignore temp files'
|
||||||
|
@ -355,7 +355,7 @@ $stow->process_tasks();
|
||||||
ok(
|
ok(
|
||||||
$stow->get_conflict_count == 0 &&
|
$stow->get_conflict_count == 0 &&
|
||||||
-f "$TEST_DIR/stow/pkg13/bin13/file13" && ! -e "$TEST_DIR/target/bin13"
|
-f "$TEST_DIR/stow/pkg13/bin13/file13" && ! -e "$TEST_DIR/target/bin13"
|
||||||
=> 'unstow a simple tree'
|
=> 'unstow a simple tree'
|
||||||
);
|
);
|
||||||
|
|
||||||
#
|
#
|
||||||
|
|
Loading…
Reference in a new issue