portugalfuturista/elixir
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve tests

Browse source 
* Run pytest only for t, do not run tests for other libraries
* Add email and name git options to test repo init
* Change test repo permissions to avoid "dubious ownership" error
This commit is contained in:
Franciszek Stachura 2024-07-09 13:12:16 +02:00
parent c54a4c3dec
commit 3f6aa021a7
2 changed files with 14 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
t/200-api.t
View file

@ -31,6 +31,6 @@ my $tenv = TestEnvironment->new;
$tenv->build_repo(sibling_abs_path('tree'))->build_db->update_env; $tenv->build_repo(sibling_abs_path('tree'))->build_db->update_env;
# Test the api using pytest. Prints the test results # Test the api using pytest. Prints the test results
run_produces_ok('api pytest suite', ["pytest", "-v"], [], MUST_SUCCEED, 1); run_produces_ok('api pytest suite', ["pytest", "-v", "t"], [], MUST_SUCCEED, 1);
done_testing; done_testing;

18
t/TestEnvironment.pm
View file

@ -135,19 +135,27 @@ sub build_repo {
die "Need a source dir" unless $tree_src_dir; die "Need a source dir" unless $tree_src_dir;
die "No repo dir" unless $self->lxr_repo_dir; die "No repo dir" unless $self->lxr_repo_dir;
my $tempdir_path = $self->lxr_repo_dir; my $tempdir_path = $self->lxr_repo_dir;
my @gitdir = ('-C', $tempdir_path); my @gitopts = (
'-C', $tempdir_path,
'-c', 'init.defaultBranch=main',
'-c', 'user.name=test@example.com',
'-c', 'user.email=test');
diag "Using temporary directory $tempdir_path"; diag "Using temporary directory $tempdir_path";
run_program('git', 'init', $tempdir_path) or die("git init failed"); run_program('git', @gitopts, 'init', $tempdir_path) or die("git init failed");
run_program('sh', '-c', "tar cf - -C \"$tree_src_dir\" . | tar xf - -C \"$tempdir_path\"") run_program('sh', '-c', "tar cf - -C \"$tree_src_dir\" . | tar xf - -C \"$tempdir_path\"")
or die("Could not copy files into $tempdir_path"); or die("Could not copy files into $tempdir_path");
run_program('git', @gitdir, 'add', '.') or die("git add failed"); run_program('sh', '-c', "chown -R `whoami`:`id -ng` \"$tempdir_path\"");
run_program('git', @gitdir, 'commit', '-am', 'Initial commit') run_program('sh', '-c', "chmod -R 775 \"$tempdir_path\"");
run_program('git', @gitopts, 'add', '.') or die("git add failed");
run_program('git', @gitopts, 'commit', '-am', 'Initial commit')
or die("git commit failed"); or die("git commit failed");
run_program('git', @gitdir, 'tag', 'v5.4') or die("git tag failed"); run_program('git', @gitopts, 'tag', 'v5.4') or die("git tag failed");
return $self; return $self;
} #build_repo() } #build_repo()