aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPer Øyvind Karlsen <peroyvind@mandriva.org>2011-06-21 11:58:42 +0000
committerPer Øyvind Karlsen <peroyvind@mandriva.org>2011-06-21 11:58:42 +0000
commit848716860b8a8fb02721364f4d6d10ad5b1a312a (patch)
tree5231336a1950076ee45871370b5285d5bbc31770
parent4878adeab20a3bc78446090e2d28d1a78da91b54 (diff)
downloadperl-URPM-848716860b8a8fb02721364f4d6d10ad5b1a312a.tar
perl-URPM-848716860b8a8fb02721364f4d6d10ad5b1a312a.tar.gz
perl-URPM-848716860b8a8fb02721364f4d6d10ad5b1a312a.tar.bz2
perl-URPM-848716860b8a8fb02721364f4d6d10ad5b1a312a.tar.xz
perl-URPM-848716860b8a8fb02721364f4d6d10ad5b1a312a.zip
add some regression tests for parsing disttag & distepoch from synthesis
-rw-r--r--NEWS3
-rw-r--r--t/synthesis.t24
2 files changed, 16 insertions, 11 deletions
diff --git a/NEWS b/NEWS
index 71849a0..da12967 100644
--- a/NEWS
+++ b/NEWS
@@ -1,5 +1,6 @@
-Version 4.34 - 1 June 2011, by Per Øyvid Karlsen
+Version 4.34 - 21 June 2011, by Per Øyvid Karlsen
+- add some regression tests for parsing disttag & distepoch from synthesis
- extract disttag & distepoch from new fields in @info@ of synthesis
Version 4.33 - 31 May 2011, by Per Øyvind Karlsen
diff --git a/t/synthesis.t b/t/synthesis.t
index 0ed85dc..7800792 100644
--- a/t/synthesis.t
+++ b/t/synthesis.t
@@ -2,7 +2,7 @@
use strict ;
use warnings ;
-use Test::More tests => 96;
+use Test::More tests => 100;
use URPM;
chdir 't' if -d 't';
@@ -10,11 +10,11 @@ my $file1 = 'synthesis.sample.cz';
open my $f, "| gzip -9 >$file1";
print $f <<'EOF';
-@provides@glibc-devel[== 6:2.2.4-25mdk]
+@provides@glibc-devel[== 6:2.2.4-25:2011.0]
@requires@/sbin/install-info[*]@glibc[== 2.2.4]@kernel-headers@kernel-headers[>= 2.2.1]@/bin/sh@/bin/sh@/bin/sh@rpmlib(PayloadFilesHavePrefix)[<= 4.0-1]@rpmlib(CompressedFileNames)[<= 3.0.4-1]
@conflicts@texinfo[< 3.11]@gcc[< 2.96-0.50mdk]
@obsoletes@libc-debug@libc-headers@libc-devel@linuxthreads-devel@glibc-debug
-@info@glibc-devel-2.2.4-25mdk.i586@6@45692097@Development/C
+@info@glibc-devel-2.2.4-25-mdv2011.0.i586@6@45692097@Development/C@mdv@2011.0
EOF
close $f;
@@ -44,9 +44,11 @@ my $pkg = $a->{depslist}[0];
ok($pkg);
ok($pkg->name eq 'glibc-devel');
ok($pkg->version eq '2.2.4');
-ok($pkg->release eq '25mdk');
+ok($pkg->release eq '25');
+ok($pkg->disttag eq 'mdv');
+ok($pkg->distepoch eq '2011.0');
ok($pkg->arch eq 'i586');
-ok($pkg->fullname eq 'glibc-devel-2.2.4-25mdk.i586');
+ok($pkg->fullname eq 'glibc-devel-2.2.4-25-mdv2011.0.i586');
ok(!defined $pkg->buildarchs);
ok(!defined $pkg->buildhost);
is($pkg->buildtime,0);
@@ -58,13 +60,15 @@ my ($name, $version, $release, $disttag, $distepoch, $arch, @l) = $pkg->fullname
ok(@l == 0);
ok($name eq 'glibc-devel');
ok($version eq '2.2.4');
-ok($release eq '25mdk');
+ok($release eq '25');
+ok($disttag eq 'mdv');
+ok($distepoch eq '2011.0');
ok($arch eq 'i586');
ok($pkg->epoch == 6);
ok($pkg->size == 45692097);
ok($pkg->group eq 'Development/C');
-ok($pkg->filename eq 'glibc-devel-2.2.4-25mdk.i586.rpm');
+ok($pkg->filename eq 'glibc-devel-2.2.4-25-mdv2011.0.i586.rpm');
ok(defined $pkg->id);
ok($pkg->id == 0);
ok($pkg->set_id(6) == 0);
@@ -92,13 +96,13 @@ ok($requires[8] eq 'rpmlib(CompressedFileNames)[<= 3.0.4-1]');
my @provides = $pkg->provides;
ok(@provides == 1);
-ok($provides[0] eq 'glibc-devel[== 6:2.2.4-25mdk]');
+ok($provides[0] eq 'glibc-devel[== 6:2.2.4-25:2011.0]');
my @files = $pkg->files;
ok(@files == 0);
-ok($pkg->compare("6:2.2.4-25mdk") == 0);
-ok($pkg->compare("2.2.4-25mdk") > 0);
+ok($pkg->compare("6:2.2.4-25:2011.0") == 0);
+ok($pkg->compare("2.2.4-25") > 0);
ok($pkg->compare("6:2.2.4") == 0);
ok($pkg->compare("2.2.3") > 0);
ok($pkg->compare("2.2") > 0);