From e7c7e97833780077c67e8cc5e0934314fa2c49bf Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Mon, 17 Nov 2003 20:59:54 +0000 Subject: fixed bad use of option idlist for checking its presence --- URPM/Build.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'URPM') diff --git a/URPM/Build.pm b/URPM/Build.pm index 02e5866..2bd6aca 100644 --- a/URPM/Build.pm +++ b/URPM/Build.pm @@ -344,7 +344,7 @@ sub build_hdlist { $dir = $options{dir} || ($ENV{TMPDIR} || "/tmp") . "/.build_hdlist"; -d $dir or die "no directory $dir\n"; - @idlist = @{$options{idlist}} > 0 ? @{$options{idlist}} : + @idlist = @{$options{idlist} || []} > 0 ? @{$options{idlist}} : ($options{start} || 0 .. $options{end} || $#{$urpm->{depslist}}); @idlist or return; @@ -383,7 +383,7 @@ sub build_synthesis { my ($urpm, %options) = @_; my ($ratio, @idlist); - @idlist = @{$options{idlist}} > 0 ? @{$options{idlist}} : + @idlist = @{$options{idlist} || []} > 0 ? @{$options{idlist}} : ($options{start} || 0 .. $options{end} || $#{$urpm->{depslist}}); @idlist or return; -- cgit v1.2.1