aboutsummaryrefslogtreecommitdiffstats
path: root/t/parse.t
diff options
context:
space:
mode:
authorOlivier Thauvin <nanardon@mandriva.org>2006-01-19 11:36:57 +0000
committerOlivier Thauvin <nanardon@mandriva.org>2006-01-19 11:36:57 +0000
commitea0efef5a8e321c5950b1c27f08966fe8ed19ecd (patch)
treee4cd8fcf9e1501d4faa6414b7c08af86fe9a46f2 /t/parse.t
parentc15e844f1a386540669911b7155de90c8e705c13 (diff)
downloadperl-URPM-ea0efef5a8e321c5950b1c27f08966fe8ed19ecd.tar
perl-URPM-ea0efef5a8e321c5950b1c27f08966fe8ed19ecd.tar.gz
perl-URPM-ea0efef5a8e321c5950b1c27f08966fe8ed19ecd.tar.bz2
perl-URPM-ea0efef5a8e321c5950b1c27f08966fe8ed19ecd.tar.xz
perl-URPM-ea0efef5a8e321c5950b1c27f08966fe8ed19ecd.zip
- add Urpm_spec2srcheader(): return header of src.rpm from a specfile
Diffstat (limited to 't/parse.t')
-rw-r--r--t/parse.t8
1 files changed, 7 insertions, 1 deletions
diff --git a/t/parse.t b/t/parse.t
index 9bcc24c..afe59b3 100644
--- a/t/parse.t
+++ b/t/parse.t
@@ -4,7 +4,7 @@
use strict;
use warnings;
-use Test::More tests => 24;
+use Test::More tests => 26;
use MDV::Packdrakeng;
use URPM;
use URPM::Build;
@@ -62,3 +62,9 @@ ok(URPM::rpmvercmp("1:1-1mdk", "2:1-1mdk") == -1, "epoch 1 vs 2 = -1");
ok($pkg->queryformat("%{NAME}-%{VERSION}-%{RELEASE}.%{ARCH}") eq "test-rpm-1.0-1mdk.noarch");
close $hdfh;
}
+
+{
+ my $pkg = URPM::spec2srcheader("test-rpm.spec");
+ ok(defined $pkg, "Parsing a spec works");
+ ok($pkg->get_tag(1000) eq 'test-rpm');
+}