Remove setting of verbosity from tests

This commit is contained in:
Adam Spiers 2011-11-18 12:00:05 +00:00
parent 3418cadb8e
commit a1246072dd
6 changed files with 0 additions and 47 deletions

View file

@ -25,7 +25,6 @@ $Stow_Path= '../stow';
# nothing to clean in a simple tree
#
reset_state();
$Option{'verbose'} = 1;
make_dir('../stow/pkg1/bin1');
make_file('../stow/pkg1/bin1/file1');
@ -41,7 +40,6 @@ is(
# cleanup a bad link in a simple tree
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin2');
make_dir('../stow/pkg2/bin2');
@ -64,7 +62,6 @@ ok(
# dont cleanup a bad link not owned by stow
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin3');
make_dir('../stow/pkg3/bin3');

View file

@ -43,7 +43,6 @@ make_file('stow/emacs/man/man1/emacs.1');
# stow perl into an empty target
#
reset_state();
$Option{'verbose'} = 0;
make_dir('stow/perl/bin');
make_file('stow/perl/bin/perl');
@ -70,7 +69,6 @@ ok(
# stow perl into a non-empty target
#
reset_state();
$Option{'verbose'} = 0;
# clean up previous stow
remove_link('bin');
@ -102,7 +100,6 @@ ok(
# Install perl into an empty target and then install emacs
#
reset_state();
$Option{'verbose'} = 0;
# clean up previous stow
remove_link('info');
@ -155,7 +152,6 @@ ok(
# behaviour is the same as if the empty directory had nothing to do with stow
#
reset_state();
$Option{'verbose'} = 0;
make_dir('stow/pkg1a/bin1');
make_dir('stow/pkg1b/bin1');
@ -178,7 +174,6 @@ ok(
# directories
#
reset_state();
$Option{'verbose'} = 0;
make_dir('stow2a/pkg2a/bin2');
make_file('stow2a/pkg2a/bin2/file2a');

4
t/foldable.t Normal file → Executable file
View file

@ -25,7 +25,6 @@ $Stow_Path= '../stow';
#
# can fold a simple tree
#
$Option{'verbose'} = 0;
make_dir('../stow/pkg1/bin1');
make_file('../stow/pkg1/bin1/file1');
@ -37,7 +36,6 @@ is( foldable('bin1'), '../stow/pkg1/bin1' => q(can fold a simple tree) );
#
# can't fold an empty directory
#
$Option{'verbose'} = 0;
make_dir('../stow/pkg2/bin2');
make_file('../stow/pkg2/bin2/file2');
@ -48,7 +46,6 @@ is( foldable('bin2'), '' => q(can't fold an empty directory) );
#
# can't fold if dir contains a non-link
#
$Option{'verbose'} = 0;
make_dir('../stow/pkg3/bin3');
make_file('../stow/pkg3/bin3/file3');
@ -61,7 +58,6 @@ is( foldable('bin3'), '' => q(can't fold a dir containing non-links) );
#
# can't fold if links point to different directories
#
$Option{'verbose'} = 0;
make_dir('bin4');
make_dir('../stow/pkg4a/bin4');

View file

@ -26,7 +26,6 @@ $Stow_Path= '../stow';
# stow a simple tree minimally
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg1/bin1');
make_file('../stow/pkg1/bin1/file1');
@ -42,7 +41,6 @@ is(
# stow a simple tree into an existing directory
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg2/lib2');
make_file('../stow/pkg2/lib2/file2');
@ -59,7 +57,6 @@ is(
# unfold existing tree
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg3a/bin3');
make_file('../stow/pkg3a/bin3/file3a');
@ -80,7 +77,6 @@ ok(
# Link to a new dir conflicts with existing non-dir (can't unfold)
#
reset_state();
$Option{'verbose'} = 0;
make_file('bin4'); # this is a file but named like a directory
make_dir('../stow/pkg4/bin4');
@ -95,7 +91,6 @@ like(
# Target already exists but is not owned by stow
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin5');
make_link('bin5/file5','../../empty');
@ -110,7 +105,6 @@ like(
# Replace existing but invalid target
#
reset_state();
$Option{'verbose'} = 0;
make_link('file6','../stow/path-does-not-exist');
make_dir('../stow/pkg6');
@ -127,7 +121,6 @@ is(
# (can't unfold)
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin7');
make_dir('../stow/pkg7a/bin7');
@ -145,7 +138,6 @@ like(
# stowing directories named 0
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg8a/0');
make_file('../stow/pkg8a/0/file8a');
@ -167,7 +159,6 @@ ok(
# overriding already stowed documentation
#
reset_state();
$Option{'verbose'} = 0;
$Option{'override'} = ['man9', 'info9'];
make_dir('../stow/pkg9a/man9/man1');
@ -189,7 +180,6 @@ ok(
# deferring to already stowed documentation
#
reset_state();
$Option{'verbose'} = 0;
$Option{'defer'} = ['man10', 'info10'];
make_dir('../stow/pkg10a/man10/man1');
@ -215,7 +205,6 @@ ok(
# Ignore temp files
#
reset_state();
$Option{'verbose'} = 0;
$Option{'ignore'} = ['~', '\.#.*'];
make_dir('../stow/pkg11/man11/man1');
@ -238,7 +227,6 @@ ok(
# stowing links library files
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg12/lib12/');
make_file('../stow/pkg12/lib12/lib.so');
@ -257,7 +245,6 @@ ok(
# unfolding to stow links to library files
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg13a/lib13/');
make_file('../stow/pkg13a/lib13/liba.so');

View file

@ -27,7 +27,6 @@ $Stow_Path= '../stow';
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg1/bin1');
make_file('../stow/pkg1/bin1/file1');
@ -45,7 +44,6 @@ ok(
# unstow a simple tree from an existing directory
#
reset_state();
$Option{'verbose'} = 0;
make_dir('lib2');
make_dir('../stow/pkg2/lib2');
@ -63,7 +61,6 @@ ok(
# fold tree after unstowing
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin3');
@ -87,7 +84,6 @@ ok(
# existing link is owned by stow but is invalid so it gets removed anyway
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin4');
make_dir('../stow/pkg4/bin4');
@ -106,7 +102,6 @@ ok(
# Existing link is not owned by stow
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg5/bin5');
make_link('bin5', '../not-stow');
@ -120,7 +115,6 @@ like(
# Target already exists, is owned by stow, but points to a different package
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin6');
make_dir('../stow/pkg6a/bin6');
@ -142,7 +136,6 @@ ok(
# Don't unlink anything under the stow directory
#
reset_state();
$Option{'verbose'} = 0;
make_dir('stow'); # make out stow dir a subdir of target
$Stow_Path = 'stow';
@ -169,7 +162,6 @@ ok(
# Don't unlink any nodes under another stow directory
#
reset_state();
$Option{'verbose'} = 0;
make_dir('stow'); # make out stow dir a subdir of target
$Stow_Path = 'stow';
@ -200,7 +192,6 @@ ok(
#
reset_state();
$Stow_Path = '../stow';
$Option{'verbose'} = 0;
$Option{'override'} = ['man9', 'info9'];
make_dir('../stow/pkg9a/man9/man1');
@ -222,7 +213,6 @@ ok(
# deferring to already stowed documentation
#
reset_state();
$Option{'verbose'} = 0;
$Option{'defer'} = ['man10', 'info10'];
make_dir('../stow/pkg10a/man10/man1');
@ -254,7 +244,6 @@ ok(
# Ignore temp files
#
reset_state();
$Option{'verbose'} = 0;
$Option{'ignore'} = ['~', '\.#.*'];
make_dir('../stow/pkg12/man12/man1');

View file

@ -27,7 +27,6 @@ $Stow_Path= '../stow';
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg1/bin1');
make_file('../stow/pkg1/bin1/file1');
@ -45,7 +44,6 @@ ok(
# unstow a simple tree from an existing directory
#
reset_state();
$Option{'verbose'} = 0;
make_dir('lib2');
make_dir('../stow/pkg2/lib2');
@ -63,7 +61,6 @@ ok(
# fold tree after unstowing
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin3');
@ -87,7 +84,6 @@ ok(
# existing link is owned by stow but is invalid so it gets removed anyway
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin4');
make_dir('../stow/pkg4/bin4');
@ -106,7 +102,6 @@ ok(
# Existing link is not owned by stow
#
reset_state();
$Option{'verbose'} = 0;
make_dir('../stow/pkg5/bin5');
make_link('bin5', '../not-stow');
@ -124,7 +119,6 @@ ok(
# Target already exists, is owned by stow, but points to a different package
#
reset_state();
$Option{'verbose'} = 0;
make_dir('bin6');
make_dir('../stow/pkg6a/bin6');
@ -146,7 +140,6 @@ ok(
# Don't unlink anything under the stow directory
#
reset_state();
$Option{'verbose'} = 0;
make_dir('stow'); # make out stow dir a subdir of target
$Stow_Path = 'stow';
@ -173,7 +166,6 @@ ok(
# Don't unlink any nodes under another stow directory
#
reset_state();
$Option{'verbose'} = 0;
make_dir('stow'); # make out stow dir a subdir of target
$Stow_Path = 'stow';
@ -204,7 +196,6 @@ ok(
#
reset_state();
$Stow_Path = '../stow';
$Option{'verbose'} = 0;
$Option{'override'} = ['man9', 'info9'];
make_dir('../stow/pkg9a/man9/man1');
@ -226,7 +217,6 @@ ok(
# deferring to already stowed documentation
#
reset_state();
$Option{'verbose'} = 0;
$Option{'defer'} = ['man10', 'info10'];
make_dir('../stow/pkg10a/man10/man1');
@ -258,7 +248,6 @@ ok(
# Ignore temp files
#
reset_state();
$Option{'verbose'} = 0;
$Option{'ignore'} = ['~', '\.#.*'];
make_dir('../stow/pkg12/man12/man1');