diff options
Diffstat (limited to 'rpmdrake.pm')
| -rw-r--r-- | rpmdrake.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/rpmdrake.pm b/rpmdrake.pm index 3ef5eb00..430b078b 100644 --- a/rpmdrake.pm +++ b/rpmdrake.pm @@ -64,6 +64,7 @@ our @EXPORT = qw( mirrors choose_mirror make_url_mirror + make_url_mirror_dist show_urpm_progress update_sources update_sources_interactive @@ -514,6 +515,12 @@ sub make_url_mirror { } } +sub make_url_mirror_dist { + my ($mirror) = @_; + $mirror =~ s!/(?:RPMS|media/main)\Z!/!; + $mirror; +} + sub show_urpm_progress { my ($label, $pb, $mode, $file, $percent, $total, $eta, $speed) = @_; $file =~ s|([^:]*://[^/:\@]*:)[^/:\@]*(\@.*)|$1xxxx$2|; #- if needed... |