diff options
author | Georgi Georgiev <310867+chutzimir@users.noreply.github.com> | 2022-07-09 06:10:09 +0300 |
---|---|---|
committer | Georgi Georgiev <310867+chutzimir@users.noreply.github.com> | 2022-07-09 06:10:09 +0300 |
commit | b0e35c25cfedb85a0a7c679f3606c5ff14a09f3c (patch) | |
tree | a6133a21f0a3960bcdcc108a92f64ee7e8a6d854 | |
parent | 2258cc160b3e4d1398f94b11e7ab2802795fe970 (diff) | |
parent | 2d917931ce545b6bdf0c28c405c66d23011b81e4 (diff) |
Merge branch 'no-i18n-index' of https://github.com/chutzimir/apt-mirror into HEAD
* 'no-i18n-index' of https://github.com/chutzimir/apt-mirror:
Drop support for i18n/Index
-rwxr-xr-x | apt-mirror | 75 |
1 files changed, 0 insertions, 75 deletions
@@ -544,81 +544,6 @@ sub find_translation_files_in_release } } -sub process_translation_index -{ - # Extract all translation files from the dists/$DIST/$COMPONENT/i18n/Index - # file. Fall back to parsing dists/$DIST/Release if i18n/Index is not found. - - my $dist_uri = remove_double_slashes(shift); - my $component = shift; - my ( $base_uri, $index_uri, $index_path, $line ) = ''; - - $base_uri = $dist_uri . $component . "/i18n/"; - $index_uri = $base_uri . "Index"; - $index_path = get_variable("skel_path") . "/" . sanitise_uri($index_uri); - - unless ( open STREAM, "<$index_path" ) - { - find_translation_files_in_release( $dist_uri, $component ); - return; - } - - my $checksums = 0; - while ( $line = <STREAM> ) - { - chomp $line; - if ($checksums) - { - if ( $line =~ /^ +(.*)$/ ) - { - my @parts = split( / +/, $1 ); - if ( @parts == 3 ) - { - my ( $sha1, $size, $filename ) = @parts; - add_url_to_download( $base_uri . $filename, $size ); - } - else - { - warn("Malformed checksum line \"$1\" in $index_uri"); - } - } - else - { - $checksums = 0; - } - } - if ( not $checksums ) - { - if ( $line eq "SHA256:" or $line eq "SHA1:" or $line eq "MD5Sum:" ) - { - $checksums = 1; - } - } - } - - close STREAM; -} - -print "Processing translation indexes: ["; - -foreach (@config_binaries) -{ - my ( $arch, $uri, $distribution, @components ) = @{$_}; - print "T"; - if (@components) - { - $url = $uri . "/dists/" . $distribution . "/"; - - my $component; - foreach $component (@components) - { - process_translation_index( $url, $component ); - } - } -} - -print "]\n\n"; - push( @index_urls, sort keys %urls_to_download ); download_urls( "translation", sort keys %urls_to_download ); |