summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-01-06 16:12:52 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-01-06 16:12:52 +0000
commit1e00a512393b4630fc9dba1dba051fa64c0ccd30 (patch)
tree45d06df0239fe7b7bc94b2fa80a7b30cea90dd70 /perl-install/pkgs.pm
parent960dd8c2fc966b1bc0488221a4b14077bb8b6ad4 (diff)
downloaddrakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.tar
drakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.tar.gz
drakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.tar.bz2
drakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.tar.xz
drakx-1e00a512393b4630fc9dba1dba051fa64c0ccd30.zip
get rid of g_auto_install (unused & not working)
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 2f7f62ce9..fb2960042 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -939,7 +939,7 @@ sub install($$$;$$) {
delete $packages->{rpmdb}; #- make sure rpmdb is closed before.
- return if $::g_auto_install || !scalar(@$toInstall);
+ return if !@$toInstall;
#- for root loopback'ed /boot
my $loop_boot = loopback::prepare_boot();
@@ -1159,7 +1159,7 @@ sub remove {
delete $packages->{rpmdb}; #- make sure rpmdb is closed before.
- return if $::g_auto_install || !@{$toRemove || []};
+ return if !@{$toRemove || []};
my $db = rpmDbOpenForInstall($prefix) or die "error opening RPM database: ", c::rpmErrorString();
my $trans = $db->create_transaction($prefix);