Add examples of how to enable debugging in tests

This commit is contained in:
Adam Spiers 2019-06-28 10:32:18 +01:00
parent 6233298a91
commit e4f6a6742b
2 changed files with 6 additions and 3 deletions

View file

@ -22,13 +22,15 @@
use strict; use strict;
use warnings; use warnings;
use testutil;
use Test::More tests => 6; use Test::More tests => 6;
use testutil;
use Stow::Util qw(set_debug_level);
init_test_dirs(); init_test_dirs();
my $stow = new_Stow(dir => "$TEST_DIR/stow"); my $stow = new_Stow(dir => "$TEST_DIR/stow");
#set_debug_level(4);
is_deeply( is_deeply(
[ $stow->find_stowed_path("$TEST_DIR/target/a/b/c", '../../../stow/a/b/c') ], [ $stow->find_stowed_path("$TEST_DIR/target/a/b/c", '../../../stow/a/b/c') ],

View file

@ -26,7 +26,7 @@ use Test::More tests => 118;
use Test::Output; use Test::Output;
use English qw(-no_match_vars); use English qw(-no_match_vars);
use Stow::Util qw(canon_path); use Stow::Util qw(canon_path set_debug_level);
use testutil; use testutil;
init_test_dirs(); init_test_dirs();
@ -228,6 +228,7 @@ is(
# (can't unfold) # (can't unfold)
# #
$stow = new_Stow(); $stow = new_Stow();
#set_debug_level(4);
make_path('bin7'); make_path('bin7');
make_path('../stow/pkg7a/bin7'); make_path('../stow/pkg7a/bin7');