From bc551e3227bf79f86c72b0e13b2711192cfa1466 Mon Sep 17 00:00:00 2001
From: nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c>
Date: Wed, 16 Nov 2005 20:59:53 +0000
Subject: - use MDV:: module

git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@48 971eb68f-4bfb-0310-8326-d2484c010a4c
---
 RPM4/lib/RPM4/Index.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'RPM4/lib')

diff --git a/RPM4/lib/RPM4/Index.pm b/RPM4/lib/RPM4/Index.pm
index c94d0aa..d804e8b 100644
--- a/RPM4/lib/RPM4/Index.pm
+++ b/RPM4/lib/RPM4/Index.pm
@@ -23,7 +23,7 @@ use warnings;
 
 use RPM4;
 use RPM4::Header;
-use Packdrakeng;
+use MDV::Packdrakeng;
 
 use File::Temp qw(tempfile);
 
@@ -35,7 +35,7 @@ sub buildindex {
         $pid = open($h_synthesis, "| gzip --best > '$options{synthesis}'") or return 0;
     }
     if ($options{hdlist}) {
-        $pack = Packdrakeng->new(
+        $pack = MDV::Packdrakeng->new(
             archive => $options{hdlist},
             comp_level => $options{complevel},
         ) or return 0;
@@ -104,7 +104,7 @@ sub buildhdlist {
 
 sub parsehdlist {
     my (%options) = @_;
-    my $pack = Packdrakeng->open(archive => $options{hdlist}) or return 0;
+    my $pack = MDV::Packdrakeng->open(archive => $options{hdlist}) or return 0;
 
     my (undef, $files, undef) = $pack->getcontent();
     pipe(my $in, my $out);
-- 
cgit v1.2.1