diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-06-27 23:53:08 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-06-27 23:53:08 +0000 |
commit | f08fbba859b2c21b85c5aa7170c704271e0ca62d (patch) | |
tree | ca75f5b36ecd6d37a156068f141f7dca81155ce6 /t/parse.t | |
parent | f3a5346c94ceed8c28a10511db0b1019ec532971 (diff) | |
parent | 0f5e4ddc50cf8f93de30d8c10477fff5d9d99282 (diff) | |
download | perl-URPM-f08fbba859b2c21b85c5aa7170c704271e0ca62d.tar perl-URPM-f08fbba859b2c21b85c5aa7170c704271e0ca62d.tar.gz perl-URPM-f08fbba859b2c21b85c5aa7170c704271e0ca62d.tar.bz2 perl-URPM-f08fbba859b2c21b85c5aa7170c704271e0ca62d.tar.xz perl-URPM-f08fbba859b2c21b85c5aa7170c704271e0ca62d.zip |
add new t/01setter-getter.t to MANIFEST
Diffstat (limited to 't/parse.t')
-rw-r--r-- | t/parse.t | 15 |
1 files changed, 4 insertions, 11 deletions
@@ -4,18 +4,18 @@ use strict; use warnings; -use Test::More tests => 39; +use Test::More tests => 38; use MDV::Packdrakeng; use URPM; use URPM::Build; -use URPM::Query; + chdir 't' if -d 't'; # shut up URPM::setVerbosity(2); -my $a = new URPM; +my $a = URPM->new; ok($a); END { system('rm -rf hdlist.cz empty_hdlist.cz headers tmp') } @@ -54,7 +54,7 @@ $a->build_hdlist( ok(-f 'hdlist.cz'); -my $b = new URPM; +my $b = URPM->new; ($start, $end) = $b->parse_hdlist('hdlist.cz', keep_all_tags => 1); is("$start $end", "0 0", 'parse_hdlist'); ok(@{$b->{depslist}} == 1); @@ -65,9 +65,6 @@ is($pkg->get_tag(1001), '1.0', 'version'); is($pkg->get_tag(1002), '1mdk', 'release'); is($pkg->queryformat("%{NAME}-%{VERSION}-%{RELEASE}.%{ARCH}"), "test-rpm-1.0-1mdk.noarch", q(get headers from hdlist)); -rpm_is_jbj_version() ? - ok($pkg->is_platform_compat() > 0, "can evaluate platform score") : - pass('no platform compat'); my $headers = eval { [ $b->parse_rpms_build_headers(rpms => [ "tmp/RPMS/noarch/test-rpm-1.0-1mdk.noarch.rpm" ], dir => 'headers') ] }; @@ -113,7 +110,3 @@ ok(URPM::rpmvercmp("1:1-1mdk", "2:1-1mdk") == -1, "epoch 1 vs 2 = -1"); END { unlink "bad.spec" } } -sub rpm_is_jbj_version { - # checking for --yaml support - `rpm --help` =~ /yaml/; -} |