From 66ab26598afa8239868d32b5118304c629dafe81 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Fri, 18 Jan 2008 16:46:15 +0000
Subject: - urpmi   o --install-src will succesfully installed src.rpm from    
 /var/cache/urpmi/rpms/* (unless post-clean is 0)

we could not do that by default because "urpmi --install-src" as user could
not download the file
---
 urpm/main_loop.pm | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'urpm/main_loop.pm')

diff --git a/urpm/main_loop.pm b/urpm/main_loop.pm
index c99ce474..6491dab0 100644
--- a/urpm/main_loop.pm
+++ b/urpm/main_loop.pm
@@ -124,6 +124,11 @@ foreach my $set (@{$state->{transaction} || []}) {
 	    if ($?) {
 		print N("Installation failed"), "\n";
 		++$nok;
+	    } elsif ($urpm->{options}{'post-clean'}) {
+		if (my @tmp_srpm = grep { urpm::is_temporary_file($urpm, $_) } @l) {
+		    $urpm->{log}(N("removing installed rpms (%s)", join(' ', @tmp_srpm)));
+		    unlink @tmp_srpm;
+		}
 	    }
 	}
 	next;
-- 
cgit v1.2.1