summaryrefslogtreecommitdiffstats
path: root/urpm.pm
diff options
context:
space:
mode:
Diffstat (limited to 'urpm.pm')
-rw-r--r--urpm.pm52
1 files changed, 24 insertions, 28 deletions
diff --git a/urpm.pm b/urpm.pm
index 33bf83b3..32a8a7db 100644
--- a/urpm.pm
+++ b/urpm.pm
@@ -1244,7 +1244,7 @@ sub clean_dir {
}
sub _update_medium_first_pass {
- my ($urpm, $medium, $second_pass, $clean_cache, $medium_redone, %options) = @_;
+ my ($urpm, $medium, $second_pass, $clean_cache, %options) = @_;
$medium->{ignore} and return;
@@ -1268,24 +1268,35 @@ sub _update_medium_first_pass {
next;
}
- #- list of rpm files for this medium, only available for local medium where
- #- the source hdlist is not used (use force).
- my ($dir, $error, $retrieved_md5sum, @files);
-
#- always delete a remaining list file or pubkey file in cache.
foreach (qw(list pubkey)) {
unlink "$urpm->{cachedir}/partial/$_";
}
+ #- check for a reconfig.urpmi file (if not already reconfigured)
+ if (!$medium->{noreconfigure}) {
+ my $reconfig_urpmi;
+ if (my $dir = file_from_file_url($medium->{url})) {
+ $reconfig_urpmi = reduce_pathname("$dir/reconfig.urpmi");
+ } else {
+ unlink($reconfig_urpmi = "$urpm->{cachedir}/partial/reconfig.urpmi");
+ eval {
+ sync_webfetch($urpm, $medium, [ reduce_pathname("$medium->{url}/reconfig.urpmi") ],
+ \%options, quiet => 1);
+ };
+ }
+ if (-s $reconfig_urpmi) {
+ $urpm->reconfig_urpmi($reconfig_urpmi, $medium->{name});
+ }
+ unlink $reconfig_urpmi if !file_from_file_url($medium->{url});
+ }
+
+ #- list of rpm files for this medium, only available for local medium where
+ #- the source hdlist is not used (use force).
+ my ($dir, $error, $retrieved_md5sum, @files);
+
#- check if the medium is using a local or a removable medium.
if ($dir = file_from_local_url($medium->{url})) {
- #- check for a reconfig.urpmi file (if not already reconfigured)
- if (!$medium_redone && !$medium->{noreconfigure}) {
- my $reconfig_urpmi = reduce_pathname("$dir/reconfig.urpmi");
- if (-s $reconfig_urpmi && $urpm->reconfig_urpmi($reconfig_urpmi, $medium->{name})) {
- return _update_medium_first_pass($urpm, $medium, $second_pass, $clean_cache, 'redo', %options);
- }
- }
#- try to figure a possible hdlist_path (or parent directory of searched directory).
#- this is used to probe for a possible hdlist file.
@@ -1467,21 +1478,6 @@ this could happen if you mounted manually the directory when creating the medium
chown 0, 0, "$urpm->{cachedir}/partial/pubkey";
}
} else {
- #- check for a reconfig.urpmi file (if not already reconfigured)
- if (!$medium_redone && !$medium->{noreconfigure}) {
- unlink(my $reconfig_urpmi = "$urpm->{cachedir}/partial/reconfig.urpmi");
- eval {
- sync_webfetch($urpm, $medium, [ reduce_pathname("$medium->{url}/reconfig.urpmi") ],
- \%options, quiet => 1);
- };
- if (-s $reconfig_urpmi && $urpm->reconfig_urpmi($reconfig_urpmi, $medium->{name})) {
- if (!$medium_redone) {
- return _update_medium_first_pass($urpm, $medium, $second_pass, $clean_cache, 'redo', %options);
- }
- }
- unlink $reconfig_urpmi;
- }
-
my $basename;
#- try to get the description if it has been found.
@@ -1936,7 +1932,7 @@ sub update_media {
my $clean_cache = !$options{noclean};
my $second_pass;
foreach my $medium (@{$urpm->{media}}) {
- _update_medium_first_pass($urpm, $medium, \$second_pass, \$clean_cache, 0, %options);
+ _update_medium_first_pass($urpm, $medium, \$second_pass, \$clean_cache, %options);
}
#- some unresolved provides may force to rebuild all synthesis,