From 9e2966a33f9148fdc8ef81783bab1fe18e87bd34 Mon Sep 17 00:00:00 2001
From: nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c>
Date: Tue, 4 Oct 2005 04:08:46 +0000
Subject: - move to trunk

git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@36 971eb68f-4bfb-0310-8326-d2484c010a4c
---
 RPM4/t/07changelogs.t | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 RPM4/t/07changelogs.t

(limited to 'RPM4/t/07changelogs.t')

diff --git a/RPM4/t/07changelogs.t b/RPM4/t/07changelogs.t
new file mode 100644
index 0000000..d2c2555
--- /dev/null
+++ b/RPM4/t/07changelogs.t
@@ -0,0 +1,18 @@
+# $Id$
+
+use strict;
+use Test::More tests => 1;
+use FindBin qw($Bin);
+use RPM4;
+use RPM4::Header::Changelogs;
+
+my $htest = RPM4::Header->new("$Bin/test-rpm-1.0-1mdk.noarch.rpm");
+
+my $ch = RPM4::Header::Changelogs->new($htest);
+
+isa_ok(
+    $ch,
+    'RPM4::Header::Changelogs',
+    'Get changelogs object'
+);
+
-- 
cgit v1.2.1