From 561b6b1eaf2cf64d7c33b69d57ae679a8cf874c3 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Tue, 4 Sep 2007 15:55:21 +0000
Subject: add new urpmi option, only for debugging purpose:
 --debug__do_not_install

---
 urpm/args.pm      | 1 +
 urpm/main_loop.pm | 2 ++
 2 files changed, 3 insertions(+)

(limited to 'urpm')

diff --git a/urpm/args.pm b/urpm/args.pm
index 47dbb1e2..69a8dd51 100644
--- a/urpm/args.pm
+++ b/urpm/args.pm
@@ -137,6 +137,7 @@ my %options_spec = (
 	'strict-arch!' => sub { $urpm->{options}{'strict-arch'} = $_[1] },
 	'norebuild!' => sub { $urpm->{options}{'build-hdlist-on-error'} = !$_[1] },
 	'test!' => \$::test,
+	'debug__do_not_install' => \$options{debug__do_not_install},
 	'skip=s' => \$options{skip},
 	'prefer=s' => \$options{prefer},
  	'root=s' => sub { set_root($urpm, $_[1]) },
diff --git a/urpm/main_loop.pm b/urpm/main_loop.pm
index c0d7e25c..f746f9b0 100644
--- a/urpm/main_loop.pm
+++ b/urpm/main_loop.pm
@@ -63,6 +63,8 @@ urpm::install::build_transaction_set_($urpm, $state,
 			  split_level => $urpm->{options}{'split-level'},
 			  split_length => !$test && $urpm->{options}{'split-length'});
 
+$options{debug__do_not_install} and exit 0;
+
 my ($ok, $nok) = (0, 0);
 my @errors;
 
-- 
cgit v1.2.1