From 0c6b7137257c111a7519e150b81694ed4b946a23 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Tue, 23 Jan 2001 19:20:47 +0000 Subject: updated to use new build_hdlist. --- gendistrib | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/gendistrib b/gendistrib index 910137f..1987bce 100755 --- a/gendistrib +++ b/gendistrib @@ -20,12 +20,12 @@ use strict qw(subs vars refs); use rpmtools; my $params = new rpmtools; -my ($nohdlists, $nobasefiles, @root, @hdlists) = 0; +my ($noclean, $nohdlists, $nobasefiles, @root, @hdlists) = 0; -($params->{options}{noclean}, @ARGV) = @ARGV if $ARGV[0] eq "--noclean"; -($nohdlists, @ARGV) = @ARGV if $ARGV[0] eq "--nohdlists"; -($nobasefiles, @ARGV) = @ARGV if $ARGV[0] eq "--nobasefiles"; -(undef, @root, @ARGV) = @ARGV if $ARGV[0] eq "--distrib"; +($noclean, @ARGV) = @ARGV if $ARGV[0] eq "--noclean"; +($nohdlists, @ARGV) = @ARGV if $ARGV[0] eq "--nohdlists"; +($nobasefiles, @ARGV) = @ARGV if $ARGV[0] eq "--nobasefiles"; +(undef, @root, @ARGV) = @ARGV if $ARGV[0] eq "--distrib"; @root > 0 && @ARGV == 0 or die "usage: gendistrib [--noclean] [--nohdlists] [--nobasefiles] --distrib ...\n"; @@ -72,7 +72,7 @@ unless ($nohdlists) { -d "$root/$dir" or die "unable to find a valid root directory which contains $dir\n"; print STDERR "building hdlist $hdlist as \"$descr\"\n with rpms directory $root/$dir\n"; - $params->build_hdlist($hdlist, glob("$root/$dir/*.rpm")); + $params->build_hdlist($noclean, ($ENV{TMPDIR} || "/tmp") . "/.build_hdlist", $hdlist, glob("$root/$dir/*.rpm")); } } -- cgit v1.2.1