From 01a505b06647998f3c5410f01480a19baee92d78 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 18 Feb 2003 23:08:15 +0000 Subject: don't unmount cdrom before some potential accesses will be done for actually installing packages :) --- rpmdrake | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/rpmdrake b/rpmdrake index f2f6a5d3..13eadd1e 100755 --- a/rpmdrake +++ b/rpmdrake @@ -951,7 +951,6 @@ sub perform_installation { #- (partially) duplicated from /usr/sbin/urpmi :-( interactive_msg_(N("Change medium"), N("Please insert the medium named \"%s\" on device [%s]", @_), yesno => 1, text => { yes => N("Ok"), no => N("Cancel") }) }); - $urpm->try_umounting_removables; my @rpms_install = grep { !/\.src\.rpm$/ } values %{$urpm->extract_packages_to_install(\%sources) || {}}; my @rpms_upgrade = grep { !/\.src\.rpm$/ } values %sources; @@ -976,6 +975,7 @@ sub perform_installation { #- (partially) duplicated from /usr/sbin/urpmi :-( or print(STDERR " *** ERROR *** Could not exec $grpmi.\n"), c::_exit(-1); } my $exitstatus = $?; + $urpm->try_umounting_removables; my %pkg2rpmnew; foreach my $u (@rpms_upgrade) { $u =~ m|/([^/]+-[^-]+-[^-]+)\.[^\./]+\.rpm$| @@ -990,6 +990,7 @@ sub perform_installation { #- (partially) duplicated from /usr/sbin/urpmi :-( N("All requested packages were installed successfully.")); die "return $exitstatus\n"; } else { + $urpm->try_umounting_removables; interactive_msg_(N("Everything already installed."), N("Everything already installed (is this supposed to happen at all?).")); } -- cgit v1.2.1