From de58653813d013143bdac6398b90c01b330369b8 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 5 Sep 2007 10:15:41 +0000
Subject: fix using --debug__do_not_install with --env

---
 urpm/main_loop.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'urpm/main_loop.pm')

diff --git a/urpm/main_loop.pm b/urpm/main_loop.pm
index f746f9b0..12ff4291 100644
--- a/urpm/main_loop.pm
+++ b/urpm/main_loop.pm
@@ -35,8 +35,8 @@ sub run {
     my ($urpm, $state, $something_was_to_be_done, $ask_unselect, $requested, $callbacks) = @_;
 
     #- global boolean options
-    my ($auto_select, $no_install, $install_src, $clean, $noclean, $force, $parallel, $test) =
-      ($::auto_select, $::no_install, $::install_src, $::clean, $::noclean, $::force, $::parallel, $::test);
+    my ($auto_select, $no_install, $install_src, $clean, $noclean, $force, $parallel, $test, $env) =
+      ($::auto_select, $::no_install, $::install_src, $::clean, $::noclean, $::force, $::parallel, $::test, $::env);
 
 my ($local_sources, $list) = urpm::get_pkgs::selected2list($urpm,
     $state->{selected},
@@ -59,6 +59,7 @@ $callbacks->{post_removable} and $callbacks->{post_removable}->();
 #- now create transaction just before installation, this will save user impression of slowness.
 #- split of transaction should be disabled if --test is used.
 urpm::install::build_transaction_set_($urpm, $state,
+			  rpmdb => $env && "$env/rpmdb.cz",
 			  nodeps => $urpm->{options}{'allow-nodeps'} || $urpm->{options}{'allow-force'},
 			  split_level => $urpm->{options}{'split-level'},
 			  split_length => !$test && $urpm->{options}{'split-length'});
-- 
cgit v1.2.1