diff options
Diffstat (limited to 't/resolve.t')
-rw-r--r-- | t/resolve.t | 28 |
1 files changed, 23 insertions, 5 deletions
diff --git a/t/resolve.t b/t/resolve.t index 13016c4..5888064 100644 --- a/t/resolve.t +++ b/t/resolve.t @@ -2,7 +2,7 @@ use strict ; use warnings ; -use Test::More tests => 6; +use Test::More tests => 10; use URPM; chdir 't' if -d 't'; @@ -12,16 +12,17 @@ my $db; END { if($db) { - $db = URPM::DB::close($db); + URPM::DB::close($db); } + system("rm -rf tmp"); } sub solve_check { - my ($pkg, $pkgtotal, $suggest, $write) = @_; + my ($pkg, $pkgtotal, $suggest, $write, $suffix) = @_; my $cand_pkgs = $urpm->find_candidate_packages($pkg); my @pkgs; - my $out; + my $out = ""; my $in = ""; my $file = "res/$pkg.resolve"; if ($suggest) { @@ -31,6 +32,9 @@ sub solve_check { @pkgs = $urpm->resolve_requested__no_suggests_($db, undef, $cand_pkgs); $file .= ".nosuggests"; } + if ($suffix) { + $file .= ".$suffix"; + } foreach (@pkgs) { $out .= $_->fullname() . "\n"; } @@ -64,5 +68,19 @@ SKIP: { solve_check("basesystem-minimal", 141, 0, 0); solve_check("basesystem", 527, 1, 0); - solve_check("task-kde4", 2059, 1, 0); + # odd, if running this one, the next tests fail.. + #solve_check("task-kde4", 2059, 1, 0); + + $synthesis = "res/synthesis.hdlist_distepoch.xz"; + + if (!(-r $synthesis)) { + skip "$synthesis missing, only found in svn", 6; + } + $urpm = new URPM; + $urpm->parse_synthesis($synthesis); + + solve_check("basesystem-minimal", 164, 0, 0, "distepoch"); + solve_check("basesystem", 743, 1, 0, "distepoch"); + solve_check("task-kde4", 1943, 1, 0, "distepoch"); + } |