From decf6c5f3f26024549b5bcb280e6e5713a21250e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 26 Feb 2008 19:51:41 +0000 Subject: create _mount_it() out of _examine_removable_medium_() --- urpm/removable.pm | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) (limited to 'urpm/removable.pm') diff --git a/urpm/removable.pm b/urpm/removable.pm index dd00490f..66e696c3 100644 --- a/urpm/removable.pm +++ b/urpm/removable.pm @@ -114,8 +114,8 @@ sub _examine_removable_medium { } } -sub _examine_removable_medium_ { - my ($urpm, $medium, $medium_list, $sources, $device, $o_ask_for_medium) = @_; +sub _mount_it { + my ($urpm, $medium, $medium_list, $device, $o_ask_for_medium) = @_; my $dir = file_from_local_url($medium->{url}); @@ -131,6 +131,15 @@ sub _examine_removable_medium_ { || $o_ask_for_medium->(remove_internal_name($medium->{name}), $medium->{removable}) or $urpm->{fatal}(4, N("medium \"%s\" is not available", $medium->{name})); } +} + +sub _examine_removable_medium_ { + my ($urpm, $medium, $medium_list, $sources, $device, $o_ask_for_medium) = @_; + + _mount_it($urpm, $medium, $medium_list, $device, $o_ask_for_medium); + + my $dir = file_from_local_url($medium->{url}); + if (-e $dir) { while (my ($i, $url) = each %$medium_list) { chomp $url; -- cgit v1.2.1