aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-11-15 11:22:04 +0000
committerRafael Garcia-Suarez <rgarciasuarez@mandriva.org>2005-11-15 11:22:04 +0000
commitb4eeb8c03a03ab7531103bd8b708d64d62264f9f (patch)
tree342ee3c7960298078547674b8c5269df0c643de5
parent6f3709831a2792579d350adde82640c36847a189 (diff)
downloadrpmtools-b4eeb8c03a03ab7531103bd8b708d64d62264f9f.tar
rpmtools-b4eeb8c03a03ab7531103bd8b708d64d62264f9f.tar.gz
rpmtools-b4eeb8c03a03ab7531103bd8b708d64d62264f9f.tar.bz2
rpmtools-b4eeb8c03a03ab7531103bd8b708d64d62264f9f.tar.xz
rpmtools-b4eeb8c03a03ab7531103bd8b708d64d62264f9f.zip
Use modules in the new namespace MDV::
-rwxr-xr-xdumpdistribconf6
-rwxr-xr-xgendistrib12
2 files changed, 9 insertions, 9 deletions
diff --git a/dumpdistribconf b/dumpdistribconf
index 2047072..c462606 100755
--- a/dumpdistribconf
+++ b/dumpdistribconf
@@ -4,7 +4,7 @@
use strict;
use Getopt::Long;
-use Distribconf::Build;
+use MDV::Distribconf::Build;
use Pod::Usage;
sub usage () {
@@ -24,8 +24,8 @@ GetOptions(
@ARGV or usage;
foreach (@ARGV) {
- print "Using root $_...\n";
- my $d = Distribconf::Build->new($_);
+ warn "Using root $_...\n";
+ my $d = MDV::Distribconf::Build->new($_);
$d->load or do {
warn "Can't load configuration from $_\n";
next;
diff --git a/gendistrib b/gendistrib
index 60ff3d1..4354cfc 100755
--- a/gendistrib
+++ b/gendistrib
@@ -7,8 +7,8 @@ use Cwd;
use URPM;
use URPM::Build;
use Getopt::Long;
-use Distribconf::Build;
-use Packdrakeng;
+use MDV::Distribconf::Build;
+use MDV::Packdrakeng;
use Pod::Usage;
my $urpm = new URPM;
@@ -45,7 +45,7 @@ GetOptions(
(my @root = grep { $_ } @ARGV) > 0 or usage();
-my $distrib = Distribconf::Build->new($root[0]);
+my $distrib = MDV::Distribconf::Build->new($root[0]);
$distrib->loadtree or die "$root[0] does not seem to be a distribution tree\n";
@@ -220,7 +220,7 @@ foreach (0..$#hdlists) {
# return 1 if differ, 0 otherwise
sub compare_headers_with_hdlist {
my ($hdlist, @headers) = @_;
- if (my $pack = Packdrakeng->open(archive => $hdlist)) {
+ if (my $pack = MDV::Packdrakeng->open(archive => $hdlist)) {
my %exists_headers;
$exists_headers{$_} = 0 foreach(@headers);
my (undef, $files, undef) = $pack->getcontent();
@@ -291,7 +291,7 @@ foreach (0..$#hdlists) {
synthesis => $e->{synthesis});
} else { # no rpm, creating empty but valid index
- my $pack = Packdrakeng->new(archive => $temp_hdlist);
+ my $pack = MDV::Packdrakeng->new(archive => $temp_hdlist);
$pack = undef; # closing archive
system('/bin/mv', $temp_hdlist, $e->{hdlist});
@@ -532,7 +532,7 @@ and report them.
=head1 SEE ALSO
-genhdlist(1), and Distribconf(3) for description of the format of the
+genhdlist(1), and MDV::Distribconf(3) for description of the format of the
F<media.cfg> file.
=head1 COPYRIGHT