From 6e025f28922d718b89c5316c541c1e79eeb0d79c Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Tue, 29 Jul 2003 14:37:59 +0000 Subject: added support for --keep. --- urpm/parallel_ka_run.pm | 2 +- urpm/parallel_ssh.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'urpm') diff --git a/urpm/parallel_ka_run.pm b/urpm/parallel_ka_run.pm index d94d20a1..7b8792f4 100644 --- a/urpm/parallel_ka_run.pm +++ b/urpm/parallel_ka_run.pm @@ -103,7 +103,7 @@ sub parallel_resolve_dependencies { $parallel->{synthesis} = $synthesis; #- compute command line of urpm? tools. - my $line = $parallel->{line} . ($options{auto_select} ? ' --auto-select' : ''); + my $line = $parallel->{line} . ($options{auto_select} ? ' --auto-select' : '') . ($options{keep} ? ' --keep' : ''); foreach (keys %$requested) { if (/\|/) { #- taken from URPM::Resolve to filter out choices, not complete though. diff --git a/urpm/parallel_ssh.pm b/urpm/parallel_ssh.pm index 4f6f5cbb..cfd9afe4 100644 --- a/urpm/parallel_ssh.pm +++ b/urpm/parallel_ssh.pm @@ -108,7 +108,7 @@ sub parallel_resolve_dependencies { $parallel->{synthesis} = $synthesis; #- compute command line of urpm? tools. - my $line = $parallel->{line} . ($options{auto_select} ? ' --auto-select' : ''); + my $line = $parallel->{line} . ($options{auto_select} ? ' --auto-select' : '') . ($options{keep} ? ' --keep' : ''); foreach (keys %$requested) { if (/\|/) { #- taken from URPM::Resolve to filter out choices, not complete though. -- cgit v1.2.1