diff options
| author | nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2006-06-10 18:20:12 +0000 |
|---|---|---|
| committer | nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2006-06-10 18:20:12 +0000 |
| commit | 09310cc486c311bf7e0b72918a62c4bbdb9cd146 (patch) | |
| tree | 61a8763c2b0e176d6442eb9d5d67aba529dabb67 /RPM4/t | |
| parent | c8e79ef6ecd024762bdf0a297ac2faff06cde409 (diff) | |
| download | perl-RPM4-09310cc486c311bf7e0b72918a62c4bbdb9cd146.tar perl-RPM4-09310cc486c311bf7e0b72918a62c4bbdb9cd146.tar.gz perl-RPM4-09310cc486c311bf7e0b72918a62c4bbdb9cd146.tar.bz2 perl-RPM4-09310cc486c311bf7e0b72918a62c4bbdb9cd146.tar.xz perl-RPM4-09310cc486c311bf7e0b72918a62c4bbdb9cd146.zip | |
- various rpm 4.4.6 adaptation
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@101 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4/t')
| -rw-r--r-- | RPM4/t/02header.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/RPM4/t/02header.t b/RPM4/t/02header.t index 7bba1a4..2fff439 100644 --- a/RPM4/t/02header.t +++ b/RPM4/t/02header.t @@ -18,7 +18,7 @@ my $hdr = RPM4::Header->new("$Bin/test-rpm-1.0-1mdk.src.rpm"); isa_ok($hdr, "RPM4::Header", "instanciating an header from a source rpm works"); ok($hdr->hastag(1000) eq 1, "Has tag 1000 (NAME), yes"); ok($hdr->hastag("NAME") eq 1, "Has 'NAME', yes"); -ok($hdr->hastag(1106) eq 1, "Has tag 1106 (SOURCEPACKAGE), yes"); +ok($hdr->hastag(1044) eq 0, "Has tag 1044 (SOURCERPM), yes"); ok($hdr->listtag(), "can list tag"); is($hdr->tag(1000), "test-rpm", "accessing tag by id works"); is($hdr->tag("NAME"), "test-rpm", "accessing tag by name works"); |