Modified/fixed some tests.

CVS patchset: 3760
CVS date: 2000/05/27 03:58:51

diff --git a/Perl-RPM/t/02_headers.t b/Perl-RPM/t/02_headers.t
index 28db197..a20457b 100755 (executable)
--- a/Perl-RPM/t/02_headers.t
+++ b/Perl-RPM/t/02_headers.t
@@ -52,7 +52,7 @@ print "not " if ($hdr->size <= 0);
 print "ok 6\n";
 
 # Check tagtype()
-use RPM::Constants ':rpmtypes';
+use RPM::Constants ':rpmtype';
 
 print "not " unless ($hdr->tagtype(q{size}) == RPM_INT32_TYPE);
 print "ok 7\n";